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MZ-1500/700X MZ -1900-80K /C x ST1XFM-7/NEW7/77 x JR-100x M5x VIC-1001XF-P- 11 
PASOPIAxRX-78x SC-3000x SMC-777 x PC-1850/51/45/55/81 X PC-1500 x PC -1350x PB-300/100 
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ҠКУКЕЖПГТАТТКХЕКЕНИЛТ, 大 いい に 座り 上 が っ た 異な め な サ マー 
ャ ンプ 。 交 くく 夏 の 光 を いっ ぱい に 浴び て 、 体 力 、 気 力 の リフ レッ シュ が は 
か れ た と 思い ます 。 ただ今 、 こ の サマ ー キ ャ ンプ の 楽し い ス ナッ プ の 数 々 を 
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部 ギャ ラリ ー に 展示 し て いま すす (9 月 1 2 日 まで ) 。 思い が け な い ショ 
y ド トド が 見 つか る か が も: + = 。 申し 基 み 引 お 早め 人 クラ スス 担当 まで 。 
終り に 。 イ イベ ント に 参加 も せ ず 激写 に 役 し て くれ た カメ ラマ ン 諸 姓 に 感謝 ! 
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※ 9 月 14 日 まで に 写真 部 へ 提出 し て くだ さい 。 
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案内 状 に か ぎら レボ ポート や 手紙 も 美しい 
文書 に すれ ば 説得 力も 違っ て きま る MZ-1500 
с. Т КОМЕ КОМ“ プリ ンタ * を 
つない で ワー プロ ソフ ト を 走ら せれ ば 、 た ち ま ち 
ホー ム ワ ー ブ プロ に 。 新 登場 の カラ ー 漢 字 プ リ 
ンタ MZ-1P17 な ら 、24 ド ッ ト の 美しい 文書 や 
イン パク ト の ある カラ ー 印 字 * も ……。 ま だ キャ 
ラク タ を 使っ た ちょ っ と 目 を 引く 絵入り の 文書 
や 、BASIC を 使っ た グラ フィ ッ ク 絵 ハガキ な 
£. 上 達する ほど と に 応用 範囲 も 多種 多彩 。 
あな た も ワー プロ 遊び 、 始 め ま せ ん か 。 


※EI は オプ ショ ン で すむ 
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る 必要 カ あぁ り ま せん 。 М2— 15 0 
€ LUYA BASSES - プロ に な り ま す 。 


@ カ ラー クラフ 処 理 、 多 彩 な 文字 種 … 説 得 力 の ある 文書 づく り も 自在 に 。 


パー ソナ ルコ ンピュータ 


mz 回 回 回 標準 価格 89,800 円 


く 主 な 特長 > 維 ゲ ー ム も 仕事 も スピ ー ド スタ ー ト / 高速 QD( ク イッ クティ 
スク ) 搭載 者 キ ャ ラク タブ づく り も 自在 、PCG1000 文 字 の きわ だ つ グ ダラ Ng or , 
HUIZEN ФЕН ЯЗ ЕНАЕОР5С2 УЛАН E ーー Doe 
合わ せ て 進化 する クリ ー ン 設計 eT HIISQD-BASIC€ 97 
備考 し ゃ べり も OK、 豊富 な メッ セー ジ の ボイス ボー ド 
(オプ ショ ン ) 独 能 力 を グン と 拡げ ける RAM フ ァイル (オプ 
ショ ン ) 夫 買っ た その 日 か ら 即 使え る 実用 ソフ ト つ き 

b 画面 は ハメ コミ 合成 で 、! ユ ー カ ラ JJ」( 東 海 ク リエ イト ) よ り 。 


ФМ2-1500 ワー プロ シス テム 例 シス テム 標準 価格 284,000 円 


CU-14F 1B 
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パー ソナ ルコ ンピュータ MZ-1500 標準 価格 89,800 円 А М2-1500 

14 型 カラ ー デ ィ ス プレ イ CU-14F1B 標準 価格 64,800 円 

漢字 ROM ボ ポー ド 7М218232 標準 価格 19,800 円 

辞書 ROM ボ ー ド MZ-1R24 標準 価格 22,000 円 

カラ ー 漢 字 サ ー マ ル プリ ンタ MZ-1P17 標準 価格 79,800 円 | р 

接続 ケー ブレ MZ-1C47 標準 価格 7,800 円 Ed 

ы 
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本 社 T545 大 阪 市 阿倍 野 区 長池 町 22 番 22 号 谷 (06)621-1221( 大 代表 ) @ お 問い 合わ せ は … 本 社内 国内 情報 シス テム 営業 本 部 まで 。 
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3.5 イ ンチ と 400 ラ イン て 、 キミ も 一 気 に 才 能 多 重 。 
F M-77 ル イエ ルッ ラー) は 、 ホ ビー は も 6 も ちろ ん ホー ム ユ ー 
ス で も 大 活躍 。 バラ ンス の と れ た 高 性 能 で . みん な の 
期待 に 同時 に こたえ る オー ル ラウ ンド ハ ソ コン C+, 
人 @ 時代 の 主流 、 3.5 イ ンチ マイ クロ フロ ッ ピ ィ 抹 用 

ӨЗІ Ж. 400 СУЕ-КЕЛЕУЖ-К өз 
字 ROM+400 ラ イン で 高 品 位 ワ ー フ ロ の 実力 。 
1MB/ ド ライ ブ の 大 容量 フロ ッ ピ ヒ ィ を サポ ー ト . Ө х 
イン メモ リ は 128KB。 漢字 対応 の F-BASIC V3.5 か 
ANA 3618.0 82:727 —7- — 10800927 P TRE 

e 拡張 性 に すぐ れ た カー ド 群 。RS-232C、MIDI、 

マウ ス 、 音声 合成 、 い ま 注 目 の F' M 音 湖 カ ー ド な と 。 
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3.5 イ ンチ 時 代 の 400 ラ イン パソ コン 


F'M- 77.4 


¥ 238,000 «sas <F Lo 


富士 通 バ ソコ ン r=. y; summa, CAMP 
"бе V/7370Bl- 8/ 場 無料 
2 こぶ を つ け よ つ 。 ЗЕ ë i 


夏休み こそ 、 パソ コン の 腕 を みがく 絶好 の チャ ンス 。 プロ 教室 で す 

楽し く 遊 ん で 、 た め に な っ て 、 ア タマ も カラ ダ も 大 よろ こび 人 葛 マン が 、 音 楽 、 科 学 、 ス ポー ツ な ど 多 彩 な が ジャ ン ル の ソフ ト 

親子 そろ っ て 、 友 だ ちと 、 富 士 通 プ ラ ザ 丸 の 内 へ お で が 揃っ た パソ コン キャ ンプ で 、 遊 び 心 も 冒険 心 も 、 知 的 好 

か け く だ さい 。 奇 心 も 大 満足 。 富士 通 プ ラ ザ 丸 の 内 

@ 有 名 タレ ント に よる バラ エ テ ィ シ ョ ー や 講演 。 モ モコ クラ ブ 全国 6 地区 9 ヵ所 (札幌 、 仙 台 、 名 古屋 、 大 阪 、 広 島 、 (の 2 
と の タイ アッ プイ ベン ト で どっ と 盛り あがり 福岡 ) の 富士 通 OA シ ョ ウル ー ム 、 マイ コン スカ イ ызы 


@ 宮 士 通 サ ン サ ン ゼ ミナ ー ル は 、 子 供 か ら パ パ 、 マ マ 、 ビ ジ ラブ で も 開催 中 。 
ネス マン 、0L 一 年 生ま で 、 楽 し く て 役に立つ パソ コン ・ ワ ー お 問い 合わ せ は ーーーーーーーーーーーーーーーーーーーーーー 富士 通 プ ラ ザ 丸 の 内 及び 各 0A シ ョ ウル ー ム 、 マ イコ ンス カイ ラブ へ 


F M 音 源 、 ジ ョ イス ティ ッ ク で 、 キ ミ も 遊び の 免許 皆伝 


FM-i;L7(»»-- ) は Wa t I "oS 
RIRAL, ТЫР! CRIT 3711 
[が る は wR K た アデ の し くっ て た が まり マシ ン 


@⑧ 3 5 イン チマ イク ロフ ロッ ヒ ィ 2 ト ライ ブフ 内蔵 Өс. 
セ サ イ ザ は 、FM 音 , 誠 3 童 を 含め て 合計 9 音 の 豪華 
装備 eus (2/55 ショ イス ティ ッ ク 標 準 潜 
1 参 鍵 や か 8 色 ク ラフ ィ ッ ク 様 能 OEE EHD 
S ROM C 充実 の 日 本 語 対応 ӨРМ-7< B 114 
の ある F-BASIC V3.0 る @ スー ハー イン ホー スズ て オリ 
ジ ナ ル の 映像 を フロ デュ ー ス @ メ イン メモ リ は 64KB 
標準 実装 る る バラエティ 豊か な オフ ション を 用 適 


ジョ イス ティ ッ ク 


3. 5 イン チ 時 代 の 


MES F'M-'77 L 2 


ЕЛА ノ デ 


Y | 9 c3 O О О (本 体 価格 ・FM Logo 付 ) 
ヒッ ト & ロ ング ラン の 興奮 パソ コン F'M- ІН 4 05-9 装備 の ハイ グレ ー ド ・ パ ソコ ン F'M- 11 AD2* 


Y 99,800 (本 体 価格 ) \325.000 (本 体 価格 ・ ワ ー プ ロ ソ フト 付 ) 


富士 通 株 式 会 社 e パソ コン 販売 推進 統轄 部 100 東京 都 千 代田 区 丸の内 1-6-1 7%(03)216-3211 
マイ コン スカ イラ ブ ө 九 の 内 (03)215-2392 @ 秋 葉 原 (03)251-1448 € 札幌 < 時 計 台 ビル > (011)222-5476 e 仙台 (0222)66-8711e 名 古屋 < 第 2 アメ 横 ビ ル > (052)251-7231@ 大 阪 (06)344-7628 広島 (082)247-3949@ 福岡 く 開設 準備 室 > (092)471-7203 


ビク セル ツー 
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8 月 下旬 発売 / 
3.0 DDhR3£6,800 


MSX ら 用 CO 製 作 ツ ー ル ボッ クス 


グラ フィ ッ ク エ ディ ター・ ス プラ イト エディ ター・ パ ター ン エ ディ ター 
の 3 種類 の プロ グラ ム を 収録 。 

MSX2 の 機能 を フレ に 生か し た 高 性 能 グ ラフ ィ ッ クエ デイ ター・ ス プラ イト エディ イ ター・ 
ッ パターン エ ティ イタ ー の 3 種類 の プロ グラ ム の セッ ト で す 。 それ ぞ れ の エディ イタ ー が スク 
リー ン 5(256x 212 ド ッ ト 16 色 ) と スク リー ン モ ー ド 8(256x212 ド ッ ト 256 色 ) に 対応 し て 
いま す の て 、 VRAM は 64K で も 128K で も OK で + (ハイ ドラ イド 開発 に も 使用 ) 
また 、 こ れ ら の エディ ター は 全て 、TT&E の アフ リケーション ソフ ト 開 発 用 に 作製 きれ 、 
現在 で も 実際 に 使わ れ て いる も の ば か ヵ り で す 。 
詳細 マニ ュ ア ル と 早見 表 付 き で 、 今 すぐ に 、 誰 ( 
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- で も 使い こなせ ます 。 VRAM64K に よる (スク リー ン モ ー ド 5 に よる ) サン プル 画面 (作製 中 ) で す 


BD REXT LIP EICMSX TEN // 
FM- プ 版 発売 以来 、 ど 年 の 歳 月 を 経て 最新 の 技 
術 を 投入 し 、 オ リ ジ ナ ル を 上 まわ る 完成 度 、 構 想 
新た に ニュ ー ス タイ ル 。 


2 作 性 を 重視 し た 、 コ マン ド 選 択 方 式 。 

登場 キャ ラク ター 多数 。 も ちろ ん 会 話 モ ー ド OK。 
с 年 は 1 画面 、1 秒 以下 の 瞬時 表示 。 
@ ヒ ント 集 申 し 込み カー ド 付 。 


ERA OMS 
ASX P Te 


йыз MA 


БЕ ш о кш» ч. U 
) Ta Lk чул сї, 554 
4 E E 12 ここ 1 sf 
m 
4 " 


CDA (32K 以 上 ) テ ー プ 3 本 組 \4.800 


惑星 メ フ ィ ウ ス 関 連 商 品 発 売 中 ,/ 


文 惑星 メ フ ィ ウ ス の 開発 過程 が 本 に . ノ 
「 惑 星 メ フィ ウス は こう し て 作ら れ た 」 
東京 書籍 刊 \720 
文 惑星 メ フ イイ ウス が ビデ オデ ティ スク で アニ メ ゲ ー ム に ,/ 
Ф 701752 леи oT 
@ 映像 製作 東映 動画 
ex = x 


PLANET 
MEPHIUS 


FM-7/NEWT7/T1 
ЕМ-//МЕМ/7/77 


7--7(3Ж)М `Y 4.800 
SF Dh Y 6.800 
3.5 F Dh Y 6.800 
PC-6001mk/6601/SR->— 7 (37k) hix ¥ 4,800 
PC-6601 3.5 ТОЛ 6,800 
PC-6601SR 3.5 1DD 版 6.800 


055» ココ ノブ ヒト S UI VU EEE 


ЕЕЕ 


AI IE E (358 A. X ZI CEU. 1 ル マ 
5. ド 、 >?2тАЯЦ жай, 
高度 な 重ね 合わ せ 処 理 に より 、 下 半身 が 木 に 
か くれ 、 水 に 流す る 立体 画面 想 フレ グラ フィ ッ ク 
の 広大 な 画面 上 を 流れ る よう に な め ら か に 動く 
キャ ラク ター は 20 種 以上 衣 ゲ ー ム 途中 で の デー 
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SIMULATION 


3-D ゴ ルフ シミ ュ レ ーション スー パー バー ジョ ン 


ハイ ドラ イド 


ご 2 版 新 発売 / 


VRAM128Kb 256 メ 212 ド ッ ト 、256 色 
使用 モー ド 対 応 (VRAM64Kb 用 プロ グ 


タ セ ー ブ ロ ー ド 可能 ж ジョ イス ティ ッ ク 対 応 護 B 
GM 同時 進行 


ラム 同時 収録 され て お り ま す ) ж | PC-6001mkII …… テー ブフ 版 \4.000 
d.5FD 版 学 6.800 B | PC-6601 専 用 ……3.5'1D 版 \6.800 
= ___ E | PC-6601mkIISR… テ ー プ 版 \4.000 
27—718 34.800 Š | PC-6601SR 専 用 3.5'"1DD 版 \6.800 
MSX (32K) MM テー ブフ 版 \4.800 PC-6001mkII/6601/SR B Lno-danig «eene 5'2DDPR X 6.800 
РМЕТ ТТ の の で Ro 3.5FD 版 6,800 PO-ODOTNE 8 «eedem EL LL X... 3 5”2DDFR Y 6.800 
FM-7//NEW777…… ひ (……… 5FD 版 6,800 PC-6601SR 専 用 …………… に RT fc i acinus 3.5'FD 版 \6.800 
FM-7NEW777…………… テー プ 版 \4.800 PC-8801/mkII/SR………… l 1MZ-1500…………… QD 版 \4.000 
X1/C/turbo/F E aE TR AER 7 — 7 № X 4.800 X1 turbo/F mm © 日 立 S1 KN テー プ 版 \4.000 


ゲー ム フ リ ー ク と ゲー ム デ ザイ ナー の 接点 を 作り まあ 


T&E マガ ジン No.6 発 行 中 
“ 
&E マ ガ ジ ン No.6 発 行 
テー テン イタ テー ダダ ` 製造 ・ 販 売 株 式 会 社 テ ィ ー ア ンド イー ソフ ト 傘 (052)773-7770 
T465 名 古屋 市 名 東 区 豊 が 丘 1810 番 地 


※ 通 信販 売 ご 希望 の 方 は 現金 書留 で 料金 と 商品 名 ・ 機 種 名 を 明記 の 上 当社 宛 お 送り くだ さい 。 (送料 サー ビス ・ 速 達 希望 の 方 は 300 円 プラ ス ) - 
ж YZ77NO0.6-38 EDA. OOP F2 (20059058, Ж ына, (葉書 で の 請求 は お 断わり 致し ます 。 ) 
放 カ タロ グ NO.3 ご 希望 の 方 は |00 円 切手 同封 の 上 、 カ タロ グ 請求 券 を お 送り くだ さい 。 (葉書 で の 請求 は お 断り 致し ます 。) 


KZ マー ク は 、 マ イク ロ ソ フト 社 の 登録 商標 で す 
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PC-6000 シ リー ズ ()%-- ЙЕ 倉林 弘明 17 


る スペ ー ス ステ ーション o BEKUN 18 
QM 22472 us ua 宮本 健太 郎 18 ЄР... СО. ЧИШЕП TO DSN 
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c-—— DUREE ° E om n [xw Оууу mm н 
⑦ ル アー 釣 リ ゲー ム T РЕМИ 鈴木 保 21 1 Moon - 
PC-800Imk II コズミック ・ レ ー ル л Lid MCNT 80 224 МА55-4 ын s.l uapa. дие 
Pc-8000 シ リー ィ MENMEWARGAME- ES е OCATHEY ——-- а ` 
MZ-1200・80K/C ТТТ” nem a m a nem 氏家 一 浪 149 
ハン テ ング cox NE E is PC-1250/51/55/45 テニ E 2.5 ; PA gr PA NI ЧЫ МАИДА 若 旅 IE 152 
м2-700/1500 a iet. C M AN. six s | РС Гей ЯЛЫ тай Ж rm 山口 真一 郎 154 
MZ -2000/2200/80B O32774—- БОТА AE SA MUSHA 23 РС-1261 Вав Wr cu te ict Er due 中 小原 亮 156 
MZ-2200/2000 デイ ジネス ОНЫС NANI ドル ー ビ ピー 109 РС-1350 8/2041 —BD-—h 人 くい べ っ ぷ し ん 158 
DO ss месі — ра ЕМ ISG зе ラグ ナ ロ ッ グ ガ イ 160 
X1 シ リー ズ 人 チョー ジン ・ レ ー ス * 85 VAT age ME 在原 宏夫 24 | PC-1245 ダウ ト SUE Cg pH RNC AUS ӨРУ EM А 伊藤 直広 162 
⑥ カ ラー 星 ・ 戦 争 TONO сі.” プロ ッ タ プリ ンタ あお 25 IBI バ ッ テ ィ ング ・ ゲ ー ム M 豆 野 英 樹 164 
м руу IT 
全 ぶ ク ル マ キ ョ ー ソ ー ҚЫЛ ААА ҚУАДЫ MEOU 27 IBI バ レー ボー ル ・ ゲ ー ム ше ы АМАЛ RY 村 下 武士 166 
g ミ ラク ル ・ ボ ー ル i А Ы a an Sayt. 荒木 俊行 96 HB タン ク ・ ア タッ ク MEC NNUS, FKFK & BPC 168 
BB 不思議 森 の 仲間 た ち eee タキ モー 108 BRL D pae. uu... 豊原 広 行 170 


= FM-7 シ リー ズ ミラ クル R 
PC-6000 シ リー ズ IKEE /N = Yy ZZ 1005- | 


PASOPIA 
MZ-1500 


REPORT パソ コン D J AMI: seus lU SENEC COUNT А 177 

om 名 機能 / ya ТОД o d MC DR ば ぱん ぷ き ん ば ぱい 141 
パー フェ クト . デ テク ニック | ニー クエ イ テ ィ イフ ブロ ダ 2 ツ | - w 
迎 夢 快 人 の 人 己 I 必 講座 [番外 編 ] -———....... sw in 
ZBOv2-iIBMEA.-— NNN жаа 


マイ コン 人 生 ・ 相 談 室 …………182 昆虫 採集 ee 
ポケ コン ・ チ ェ ッ クサ ム …… PiO パ ー ツ …-21,25,27,31,79,95,113 
チェ ッ ク サ ム ・ プ ログ ラム …… 132, 151, 153, 155, 161, 163, 167, 169 
PiO プ レ ゼ ント コー ナー…… パ 185 

PiO バ ザー ルド に tn 186 ソノ シー ト の 使い 方 ………… 64 


PiO ト ピッ クス 86, 102, 129, 139, 147, 171, 185 COMPAC BEST10………… 4 


イラ スト : は ら JIN/ 北 野 玲 / タ ッ 


@|= Sonosheet [B = BASIC only @ = miniPiO 


美しい 動き ы 
、 し ば し の 間 —— M 


PC-6601 SR 
PC-6001 mkII SR 


S R ユー ザー 期待 の パー ト II が 遂に 完成 / 拡大 


され トリ ッ キ ー に な っ た 戦闘 エリ ア に , パワ 
ー ア ッ プ し た メカ ニカ ル ・ ア ー マ ー や 巨大 戦闘 
鑑 が 登場 する . トリ ゾイド に は |9 発 の 被弾 


に 耐え る 強化 装甲 を 施し , イン ター セ フ 
ター の 速度 を アッ プ / 7 つの 歩行 パタ 
ー ン シン と 13 の 変形 パタ ー ン に よる 完全 
自由 3 変形 は アニ メ 映 画 の よう に 美 
SR aq 
クラ フト 時 に は 強制 スク ロー ル 
А L, 壁 に 接触 すれ は 自爆 する . 
各々 の 形態 を 使い 込 な し フ 
E レイ ク ・ ス ルー( 中 央 突破 ) 
"А する 時 , 目 分 だ け の 戦闘 
劇 を 演じ て いる こと に 
すく と だ あう 7 


ұмы + 


9 ла 


mA 


E, クト Jfv 
スー a HE 25,2 7l» Wy 22 
ター セプター に 変形 し , 弾 を か いく で ぐ PANY 


複雑 な 地形 だ . ノ バト ル ・ ス ー ツ で スク ロー ル を 止め , ジャ 
ンプ し な が ら 乗 り 越 える か ? それ と も 強引 に イン ター セ 
プター て すき 間 を く で ぐり 抜け る か ? 自由 に 選べ る 3 変形 . 


と いう の が M 2-15 
ユー ザー の 合 青葉 
に な っ た ほぼ どの 大 人 気 Е— F. ЖЕ 
感 グラ フィ ックス が 見 事 に 調和 .. ЖО) 
お 父さん も や みつ き に な る . 
*MZ-1500| QD | 
*PC-80/88( МЕ — F) |C] 定 価 3,800 円 


ruris 
2. 純正 JS 
を 持っ て いる 君 は 体験 すべ し . 操作 が 楽 
に な る 分 , 育 景 を ゆっ くり 見 れる . 延々 
29 分 も 続く 育 景 は アー ト の 世界 に 迫る / 
*FM-7 C 定価 3.800 円 
D 定価 各 5,800 円 


人 公 が 評判 の こ 

の ゲー ム , 一 見 簡 

単 そ うな 面 も 実は 2 重 3 重 の トリ ッ ク が 
仕掛 けら れ て いて , 解く の に は か な り 頭 
を 使う . 特に この 面 は 作者 以外 誰 も 解い 
て いな い / * PC-9801[5"2D 


= Kak P: an 91095 2H Ik C 2 D rz 4m xp annt 


cC. 思わ ず は じ た な な い 書 

葉 を 叫ん で し まう ホッ ト 
な 3 D バ イク . ジリ ジリ 寄っ て くる 相手 
の ライ ダー の いや らし さ . 君 も 負け ず に 
急 カ ー プ は ハン グ ・ オ ン , 直線 は スロ ッ ト 
JV e BH / *FM-7|C 定価 3,800 円 
2D 定価 各 5,800 円 (77L4 不 可 ) 


I5^2D [3.5"2 5203.5 


(DP C-980| 用 5 2D 74 271320 Doy C, PC-9801/E/ F で こ 和 使用 に な れ ま 
3. 5 2HD は MZ2/3 で こ 覗 用 に な れ ま す . また , 表記 の な い ソ フト は 高 解像度 
C R T が 必要 で す . 

(ОР С-8801/ тк II 用 ソフ ト は SR の N88- B А 5 IC VImode(S) で 使用 可 

(ЗР C-800I/m k II 用 ソフ ト は S R お よび PC-8801/m k II/ S R の N-BASIC 
mode で こ 和 使用 に な れ ま す . 

@ P С-800!т k II 用 ソフ ト は PC-800Im k IIS R の N80-BASIC mode 可 . 

(SP C-6001/m k II 用 ソフ ト は SR,6601 シ リー ズ の N60-BASIC 32k mode z]. 


OF M-7 用 ソフ ト は 表記 が な く と も FM-NEW7/77/77L2 で こ 覗 用 に な れ ま す . 

の XI 用 ソフ ト て で 要 Hu-BASIC と ある の は CZ-8CB0I が 必要 で す . XI turbolO 以 
外 の X | に は 本 体 に 付属 し て いま す が , turbo10 に は 付属 し て いま せん . また , 
表記 が な く と も XI(CZ-800C) は G-RAM が 必要 で す . 他 の XI は 標準 装備 . 

8L3/SI, SI 用 ソフ ト は それ ぞ れ の 拡張 R А M が 必要 で す . 

9 媒体 表記 等 に 次 の 略号 を 使っ て お り ま す . C つ カセ ッ ト , 
HD 


ロ D2 ロディ スク 


J 3 ジョイ スティック 。, 


"5 2 ADTA RZ, 3:5D-y352D2 + Z2;, 0 ロー っ つっ クイック ディスク, 


cw] この マー ク の ゲー この マー ク の ゲー 
жк ム は コン スト ラク ム は JS(FM 一 7 
Б! ショ ン 付 き は 純正 ) 使用 可 


@ 通 信販 売 の 場合 は 送料 1. 本 500 円 、 2 本 目 以上 は 、 2 
本 目 以降 1 本 に つき 100 円 ( 例 2 本 な ら 600 円 ) 


| BIER 1E ос 
p タマ ゴ に 見 事 、 Fen 


“ X 4 


(FM- Ж a 


エッ グ キ ッ ズ が うじ ゃ うじ ゃ た むろ す 巣 の 中 で 
た くさ ん の タマ ゴ が 上 下 に 左右 に 動い て いる . 
PR お まけ に ぶつ か り 合 うと その 場 で 反転 し て 
o 動き の スト ロー ク が 変化 する . 油断 し て 
e \ いる と 逃げ 場 が な く な り 潰さ れ て し まう . 
Ф そこ に 現われ た 見 習い 魔法 使い マジ マ 
А ジ 「 へ っ ちゃ ら だ い / 潰 され る の は 
"А 僕 も キッ ズ も 同じ こと . うま く キ 
ッ ズ だ けが 潰さ れる よう に 誘い 
出す さ 」. と ころ が タマ ゴ の 動 
き て 迷路 が 変わ る の で , と 
ん と 先 を 読む こと が で き 
な い / あ せっ て タマ ゴ を 
2151-5, そこ か ら キ 
у АЗАН (,7-/ 

完成 度 の 高い 30 面 
の 思考 型 追跡 劇 / 


- プッ シュ ブル II 


PUSH: PULL PUSH: PULLI 


OSL 
е %% 

14 4 
БІТІСІ 
90000 000 sx 
2660, EI T T 
009” 000 

H 600000 


LIT 4 2 
005000 ш С2 HI -BCORE 005000 


Ë . の の os 
. 000000 SCORE . 000320 05 


写真 で は 止ま っ て 見 える が , E7 7 EEE 
いる . タ マ ゴ に 潰さ れ な いよ う , エッ グ キ RAISES 
いよ う 走 り 回 る の だ ./ 潰 れ て いる キッ ズ は つる 19 の 2 


な ん と . ノ フル ー ツ だ ら け . う まく 〈 く フルーツ を 取っ て 通路 
を 作り , キ ッ ズ を 1 匹 ず つ 誘 い 出 し て , タマ ゴ で 潰せ ./ 
E で 画面 を 停止 させ て 撮影 し まし た こん な ユニ ー ク な 面 が 30 面 . コ ンス ト て 君 の 面 も 作れ る . 


< 70010510 SCORE ЖҰПТЫ 
м == 


で きる の 知っ て る 

か ? 新 発 売 の 3.5" 
版 は 純正 JS に 対応 . カセ ッ ト 版 を 持っ 
て る 君 に は GIS で 改造 法 を サポ ー ト する . 
変形 操作 が 新鮮 な スク ロー ル ・ シ ュー テ 
Pu *FM-7 CI 定価 
3,800F3 5"20|[3.5" 20] Ж fff 5 ,800F3 


ザ . ア ド ベ ンチ ャ ー 
倫 は どれ も 理 に カ 
な い , 突拍子 も な い 答 え は ひと つも な い . 
これ が 本 来 の アド ベン チャ ー な ん だ . B 
に 無理 な こと は 主人 公 に も 無理 だ . 日 本 
初 ノ パー ト 別 ヒン ト で サポ ー ト する ぞ . 
*XI C ZEA , 800P3 


ゲー ム 情 報 続々 公開 / 新 発 売 が 


が ユニ ー ク / 伸び 縮み する 
の た め に ある . 戦士 の 能 は し ご や 殺人 プレ ス 機 な ど 
力 は プレ イヤ ー の ちょ っ と し た 操作 で 大 主人 公 の 邪魔 を する 脇役 が 実に 疑っ て い 
š く 差 が つく / も し , 戦士 が 空 を 飛べ た る . 2 画面 分 の 謎 の 工場 の 中 を 跳ん だ り 
ら / そ ん な ユー ザー の 声 が 戦士 を 登場 走っ た り し な が ら 放 射 能 物質 を 奪取 する 
B ж X1(38JS) X PC-88 ハー ド ボ イ ルド 風 な NEW ア クシ ョ ン Z 
C 定価 各 3.800 円 娘 PC-88 5*2D 近日 発売 * MZ-1500| QD | 近日 発売 


ゲー ム の 絡 テ クニ ッ ク 、 必 履 造 、 パ スワ ー ド 、 無敵 モー PC-8001mkIINR -3401- 
4 prc Cni 1 од サザ ・ コ ロッ クビ ピット 369027 株 式 会 社 コ ム バ ッ ク C MERI A 
イト ル は 月 刊 /O 誌 グリ ー ン 頁 に 毎月 掲載 し て いま す . IC! 定 価 4.800 円 〒|5| 東京 都 渋谷 区 代々 木 |-37-| ぜん らく ビル 5F 


NECPOSSNMEeDIaEsai 


今年 の 夏 は 、 こ いつ で 熱い / 


お くれ る な / 横井 は 今 35 面 挑戦 中 / 


NPGMIVIUIE 


ュー ーー < ゴーーー 


近ごろ 世間 で は 、" モ ー ル ・ モ ー ル 」 と いう の が 
な か な か の 評判 だ 。 教 室 の すみ で ヒ ソ ヒ ソ 、 学 校 
の 帰り 道 で ワイ ワイ て な 具合 な ん селеу 
だ が ちっ と ば か し 世間 に うど と に 者 
に 教え て あし な う ひ と 言 で いえ は : 
も ぐら の モー ル 者 が 、 土 に 埋まっ て 
し まっ た お イモ や パパ イヤ 、 キ ウイ な ど を 、 う まく 拠 
りあ て て 食べ る ゲー ム だ 。 だ けど 、 こ れ が そう 蘭 
単に いく も の じゃ な い 。 ニ ュー トン さん は 偉 か っ た 。 
物 み な 下 に 落ち る の 法則 どう り 、 モ ー ル 君 も 下 に 
掘り 進む こと は で き て も 、 上 に 行く に は ハシ ゴ を 
登る し か な い 。 お まけ に 、 土 の 中 に は 唯一 の ジャ 
マ も の で ある 岩 が ある 。 こ いつ の トト 
を 掘る と 落ち て くる けど 、 モ ー ル 君 
は 根っから の 石頭 。 岩 が 頭 に あ 7 
っ た ぐら い べ っ ちゃ ら 。 で も や っ か 
いな こと に この 岩 が モー ル 君 の 進路 を ふさ いで 
し まう の だ 。 だ か ら よ ー く 考え て 穴 を 掘っ て いか な 
いと 、 ご ち そ う は 食べ られ な い ワ 、 岩 で 身動き と れ 
な い ワ で ByeBye し な くち ゃ いけ な く な る 。 だ けど 
1 面 で 5 回 の チャ ンス が ある か ら 、 ま ず と に か く や 
っ て みる こと 。 和 失敗 は 成功 の も と だ 。 そ れ に 全部 
で 50 面 ある し 、 ど の 面 か ら で も 始め られ る (46 一 
50 面 は 指定 で き な い ) 371 Ft pR S 


ド も ある 。 お まけ に な ん と コン スト ラ E 
クシ ョ ン 機 能 ま で つい て いる 。 お っ と 、 WSS 


お 近く で 、 お 求め に な れ な い 場 合 
は 、 商 品名 ・ 使 用 機種 名 記入 の 
上 、 代 金 と 送料 (500 円 ) を 現金 書 
留 に て 、 下 記 ま で 直接 お 申し 込み 
397 


忘れ て は いけ な い 。 こ れ に は 、 自 分 
が どの 面 を クリ アー し た か 一 目 で m 
わか る 個人 記録 機能 が つい て い ES 
る 。 (ディ スク 版 の み ) だ か ら 、 ア イツ "И 
が あの 面 を 解い た ん な ら オ レ ( すこ っ ち を 解い て や 
ろう な ん て 競争 も で きる わけ 。 そ の うえ 、 ス テッ プ 
数 が 表示 され て いる か ら 、 ど れ だ け 効 率 よ く ク リ 


ー で きる か と いう 楽し み 方 も ある 。 こ れ で ディ ス 


0000 


ク 版 5, 800 円 、 カ セッ ト 版 3, 800 円 は 安い ! それ 
こ 、 今 今 な ら 次 の 特典 が ある 。 

る お 買い あげ の 方 は も れ な 〈 モー ル ・ モ ー ル ・ 
クラ フ , の 会 員 に ! 会 員 に な る と 会 員 証 、 特 製 ス 
コッ プ ・ ボ ー ル ペン 、 メ モ 帳 、CROSS MEDIA 
PRESS 最 新 号 を プレ ゼン ト 。 

念 第 50 面 が の クリ アー で きた 方 に は 抽選 で 200 名 
様 に スタ ジア ムジ ャ ン パ ー を プレ ゼン ト 。 締 切り ・ 
50 年 10 月 末 ま で て 。 

久 君 の オリ ジ ナ ル 面 が 発売 され る 。 コ ンス トラ ク 
ショ ン 機 能 で 君 だ け の オリ ジ ナ ル 面 を つく っ て 送 
ろう 。 こ の 冬 に 発売 され る '" モ ー ル ・ モ ー ル 2」 に 
採用 され る ゾ 。 (採用 分 に は 当社 規定 の 謝礼 金 
を 差し あげ ます ) 締切 り ・60 年 10 月 末 ま て 。 


@= @ 8 月 未 発売 予定 
FM-7NEW7/ 77 PC-6601ss 

5 ネン チ ・3.5 イ ンチ IBLF 

カセ ッ ト カセ ッ ト 


PC-8801/mkII/mkIlss | PC-6001mklIIsa 


5(- カセ ッ ト 

カセ ッ ト PC-9801F 

X1/X1turbo J 54 

5 イン チ PC-9801U 

カセ ッ ト 3.5 イ ンチ 

※ す べ て ディ スク 版 ¥ 5,800 
カセ ッ ト 版 ¥ 3,800 

MSX も まもなく で る そ 


と ころ で 、 こ の MOLE-MOLE が 第 5 回 原宿 
音楽 祭 パ ソコ ン ソ フト コン テス ト の 優秀 賞 受 賞 
作品 だ と いう こと を 知っ て いた か な 。 こ の コン テ 
スト は 今年 も 開催 され る 。 い っ ちょ や っ て や ろう 
と いう 君 は 、 下 の 応募 要項 を よく 読ん で どん ど 
ん 自信 作 を 応募 し よう / 


コン スト ラク ショ ン で 、 君 だ け の オリ ジ ナ ル 面 を つく ろう Z/ 


ーー レー ニー レト ーー B 


〒107 東京 都 港 区 北青山 3-6-I8 
(共同 ビル 青山 2F) 
日 本 エイ ブイ シー 株 式 会 社 
PiO f£ 
販売 店 を 募集 し て いま すず 
販売 に 関す る お 問い 合わ せ は 、 
日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 
企画 部 まで 。 7%03-486-4121 
文 健 康 で 明る 〈、 集 中 力 の ある 
プロ グラ マー、 企 画 力 の ある プロ 
デュ ー サ ー 募 集 . ノ 
ビク ター 音楽 産業 株 式 会 社 PS 制 
作 部 まで 。 容 03-486-9470 
ж 36 56 
ビク ター 音楽 産業 株 式 会 社 
ж Ri oc 
日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 


өз 

@ 最 優秀 グラ ンプ ブリ 1 名 。 

@ 優秀 賞 1 名 。 

e 入賞 4 名 。 

өті 

受賞 作品 の 中 より 優秀 な 作品 は CROSS MEDIA 

SOFT よ り 商 品 化 され ます 

LIS $i 

個人 また は クルー フ 

ORRE 

@ ゲー ム 、 グ ラフ ィ ッ クス 、 音 楽 ソ フト な ど で 未 発表 の 
も の に 限る 。 

e 入賞 作品 の 著作 権 は 作者 に 帰属 し 、 そ の 複製 権 、 
独占 販売 権 及び 独占 使用 権 は 音楽 宗 実行 委員 
会 に 帰属 し ます 


0 応募 方 法 

プロ グラ ム を 収録 し た カセ ッ ト テ ー プ また は ディ スケ ッ ト 、 
作品 の 内 容 、 操 作 方 法 を まとめ た 簡単 な マニ ュ ア ル 、 
ソー スリ スト 、 使 用 機種 の 構成 自己 紹介 文 、 募 集 を 
知っ た 雑誌 名 を 明記 の うえ 郵送 し て くだ さい 。 

0 応募 期間 

1985 年 8 月 | 日 か ら 10 月 20 日 まで (当日 消印 有効 ) 

0 審査 発表 

上 月 I 日 まで に 創作 者 に 通知 、 上 月 24 日 旧 ) ラ フォ ー レ 
原宿 ミュ ー ジ アム に て 表彰 。 


僅 応 募 ・ 問 い 合 わせ 及び パン フレ ッ ト 申 し 込み 先 
7150 東京 都 渋谷 区 神宮 前 4-26-18 
原宿 音楽 祭事 務 局 PS 係 7%03(402)5060 


РЫ 25004, Hb Ek( f рт TLD! 
Hh ERA 257-5507. ОҒ UE 27-3 WE 
ン 1 号機 を 取り 戻し た 後 、 残 り の 2 号機 、3 号 機 
と 合体 し て パワ ー ア ッ プ する た め に 、 数 々 の 敵 


る ⑧ 敵 の 大 型 空 母 ヘ ル ダ イ バー を 
追っ て ワー プ ゾ ー ン に 
飛び こめ / 


chaossmMeolacr-oi 


М D 


qie 
を 打ち 破 ら な けれ ば な ら な い 。 そ し て 最後 に は E ニニ өзе 
а と ころ だ 。 い っ て みれ ば 1 つの ソフ ト で 5 っ つの ゲー КМ T/NEWTTT 
19 ム が 楽し め る の だ 。 そ れ に キャ ラク ター の 動き 。 ティ スク 版 
も る 地 に も いろ いろ 工夫 が され て いる 。 5 イン チ 
816 & Y 6,800 
S RE 3.5 イ ンチ 
を た い カセ ッ ト 版 (2 本 組 ) 
¥ 5,800 


商 \ の 大 型 ロ ボ ・ サ ター ン と の 一 騎 討 ち が 待 っ て 
いる 。 と ころ で 、 こ の ゲー ム の 上 魅力 は な ん と いっ つっ 
て も 全 8 面 が それ ぞ れ 違っ た 個性 を も っ て いる 


F 
型 い 
Da 
e da 
"t 
1 
e 
と 


AN SN / 


⑧ 富士 通 純正 ジョ イス ティ ッ ク 対 応 
⑧ 近 日 発売 予定 X1/X1turbo 
@PC シ リー ズ 移植 中 


сугам (ОВНФЕ Z 発売 中 @ ら 月 未 発売 予定 カー ソル と 座標 の 2WAY だ 。 デ ー タ 収録 だ っ て 
味わっ て いな い 君 に ! FM-7/NEW7/777 |X1/X1turbo お 手 の も の 。 1 枚 の ディ スク に 定石 は 60 手 まで 、 

‚ы Dodo d5qu Л 5 イン チ 問題 は 40 手 まで な ら 600、 対 局 な ら 100 局 まで 収 
も う 、 キ ミ は か ぐ や 姫 に 出逢っ た か !? AS PC-8801/mkll/mkllsa |PC-6601ss 録 で き て し まう 。 も ちろ ん 、 お 手 本 と な る デー タ だ っ 


SWAP 


昨年 10 月 に FM-/NEW777 版 が 発売 され 
て 以来 、 異 色 ア ド ベ ンチ ャ ー ゲ ー ム と し て 快 進 
撃 を 続け て いる 『 新 竹 取 物語 』、 君 は も う 体 験 し 
た か な ? 『 新 竹 取 物 語 」 は 普通 の アド ベン チャ ー 


5 イン チ すべ て 2 枚 組 | 3.5 イ ンチ すべ て 2 枚 組 
Y 9,800 Y 9,800 


M Oi PC-9987U—Z.IBM-JX 


囲碁 シュ ミレ ーション ソフ ト の 
決定 版 が 出 た ぞ | та 


09/237 CCACA-Ex* 


て バッ チリ 現代 の 星 の 戦術 を は じ め 、 定 石 が 80、 
手筋 が 38、 死 活 が 20 の ほか 、 第 37 期 本 因 坊 戦 
と 第 22 期 十 段 戦 が 収録 され て いる 。 その うえ 、 
この サン プル デー タ の 説明 と し て 、 小 林 区 一 十 
段 監修 ・ 堀 田 五 番 士 構成 ・112 ペ ー ジ の 豪華 
解説 書 が つい て いる ん だ ぞ ! これ だ け 親 切な 中 
身 な ら 、 も う 碁 盤 を 見 て 目 を シロ クロ させ る こと も 


Ш Ұл 


ゲー ム と (は チト 違う 。 理 屈 抜き に 笑え て 楽し め る 。 т” 
考え て も みな か っ た どん で ん が え し 。 エ ー ウ ソ MINET. РСЗ 
~I が いっ ぱい 。 現 代 世 相 ベ ペー ソス ・ パ ロディ ー・ (G0 to SHODAN? unc 0 イン チ ・3.5 イ ンチ 5 イン た 3.54 Z7 
アド ベン チャ ー だ 。 た と えば 、 病 院 で ケガ を 冶 し て 囲碁 を あま りや っ た こと が な い 人 で も 、 自 然 と カセ ッ ト 
も ら っ て も (実は へ ビ に か まれ た 君 の 大 事 な オ ベ X 上 まし て し まう と いう お 涙 も の の ソフ ト が 出 た 。 — PC+#S0U/mkll/mkllsa 
хх) 治療 代 が 払え ず 、 怖 い お 兄 さん ら に 脅かさ 面倒 な 指示 ; RET Pepe qu 5 イン チ 
: $ 到 な 指示 を し な く て も 、 メ ニュ ー は ファ ンク ショ ン RN RR 
れ て いる 。 こ ん な 、 絶 体 絶命 の 場面 で も 、 君 の キー に 登録 され て いる か ら 、 操 作 は 実に 簡単 ※ す べ て ティ スク 版 8,800 
ウイ ッ ト が いか され る 。 仁義 を 通せ ば 助かっ た り oy | и | カセ ッ ト 版  ¥6,800 (268) 


た と えば 、 対 局 を 見 る な ら PF 1、 入力 する な ら 
PF4、 定 石 を 見 る な ら PF2、 入 力 す る な ら PF5 
と いう よう に 全部 で 7 つの メニ ュー が ある 。 中身 
の 方 も な か な か の も ん で 、 対 局 途中 に 了 予想 変化 
図 を 挿入 し て 残し て お けた り 、 石 を お いて 検討 
する こと も で きる 。 対局 の 入力 方 法 は も ちろ ん 


も する わけ 。 こ ん な 共 合 に アド ベン チャ る ゲー ム 
な の だ 。 残 人 急 な が ら 画 面 デ ー タ 及び お も し ろ さ 
の 充実 の た め 各 機種 ディ スク 版 の み 。 な お 、 み ご 
と か ぐ や 姫 に 出逢え た 君 に は 、 段 位 認 定 証 を 、 
プレ ゼン ト 。 (スコ アー100 点 以上 の み ) くわ し い 
こと は 、 直 接 問い 合わ せ て ほし い 。 


この ペー ジ に 掲載 され て いる ソフ ト に つい 
て の お 問い 合わ せ は 、 ビ クタ ー 音 楽 産業 


株 式 会 社 PS 制作 部 容 03 (486) 9470 ま た 
は 、 日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 企画 部 
まで 。 容 03(486) 4121 


パソ コン も っ て る けど 音楽 に も 興味 ある 。 そ ん な 人 に は 、 ク ロス メデ 
ィ ア の MUSIC AMUSEMENT SOFT だ 。 


いろ ん な レベ ル の 人 向け に 各種 用 意 さ きれ て いる の が ミン 。 キ ー ボ ー ド を その まま シン 
セ に し た い 人 に は スー パー シン セ 1 (MSX 版 は スー パー シン セ ) 。 サウ ンド ミッ クス が すご 
` く 簡単 で 自由 自在 な 音 づ くり が 手軽 に で きち ゃ う 。 ま た 、 作 曲 し た いけ ど 詳 面 は 苦手 と い 
う 人 に は 、 自 動 的 に コン ピュ ー タ ー が 作曲 し て くれ る クリ シェ 。 も し 気に入ら な けれ (ば キャ ン 
セル する と 別 の メロ ディ ー を 作曲 し て くれ る 。 そ し て 本 格 派 の 人 に は 、 ま さ に 音楽 の ワー 
プロ と し て 楽し め る MUSIUM1。 譜面 上 で いろ いろ な アレ ンジ が で きる 。 その うえ この CT 
MUSIUM 1 に は 、 デ ー タ 曲 集 が 発売 され て いる 。 ニ この 中 に は それ ぞ れ VOL し .1 バ ベッ ハハ ・ 
イン ベン ショ ン & シン フォ ニア 集 ( 全 30 曲 ) 旬 バッ ハハ 作曲 2 声 の イン ベン ショ ン 15 曲 、3 声 
の シン フォ ニア 15 曲 の 作品 集 。 媒 MUSIUM・ バ ロッ ク の 集大成 。/VOL.2 ク ラシック ・ 
ビ ピア ノン の 名 曲 ( 全 20 曲 ) ショ パン の 別れ の 曲 、 マ ズル カ 、 ド ビッ シー の 亜麻 色 の 髪 の 乙 
女 、 シ ュー マン の トロ イメ ライ な ど /VOL.3 ビ バル ディ 作曲 の 四季 (全曲 ) な ど が デー タ 
と し て まとめ られ て いる 。 ビバ ルディ の 四季 を コン ピ ビ ピュー ターBGM と し て 使う な ん て こと も 
で きち ゃ う の だ 。 (デー タ 申 集 は 受注 生産 で す 。 左記 の 日 本 エイ ・ ブ イ ・ シ ー 株 式 会 社 
企画 部 まで お 申し 込み くだ さい 。) ニ こま で や る と 、 ど うし て も 楽譜 を プリ ント アウ ト し た く な る 。 
そん な と き に は スー パー プリ ンタ ー・ プ ラス 。 ス コア 譜 や 特定 パー ト 、 小節 、CMD 表 示 ま 
で OK。 ま た この ソフ ト の プラ ス た る と ころ は 、 ク リ シ ェ と スー パー シン セ 1 と MUSIUM1 と 
の 共通 部 分 で の デー タ 相 互 変換 も で きる こと に ある 。 と に か く こ ん な に いろ いろ な ミュ ー 
ジッ クン ソン フト が そろ っ て いる の は クロ ス メ デ ィ ア だ け 。 ぜひ 一 度 試 し て みて は いか が か な 。 
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⑦ 通 販 を ご 希望 の 方 は 住所 ・ 氏 名 ・ 電 話 番号 ・ 商 品名 と 機種 を お 書き そえ の 上 、 現 金 書 留 に て お 申込 み 下 さい 。( 送 料 サ ービス ) 
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ОМ | ФРС-9801Е/Е/М2(5Е0 X2) 
Feirie's Residence———— — € ПОЕ, 2 2 СІ. 50 画面 の 美 少 女 が 若 が @FM7/NEW7 DISK (5FDX2) . ән 

4 ШОҚЫ k 2 > x ; e PC-8801/mkII DISK(BED X2) х 37 800 
来る の を 待っ て いる 一 体 何 が 起こ る の か 。 君 は も 5 胸 は ト キ ト キ 。 脈 は F グ F Z. 人 ド FM7/NEW7 TAPE(2 本 組 ) テー プ 版 
頭 は カッ カッ 気分 は ドリ ー ム 、 ド リー ム 、 ド リー ム 。 デ イィ イス ク 版 2 ドラ イブ 使用 。 ФРС-8801тік11 TAPE(2 本 組 ) # ¥4 500 


HERAN ЕХ а 加藤 正夫 の 


[12 人 で 対戦 が で きま す o 
BEUSMWET EMEZAN ЖЕ 
қ 回 棋譜 の 再現 
854 ЛЫ l2ACZBi«*ld 2 
全国 囲碁 ファ ン の 記憶 に 永く と ど め られ る 名 | 対局 形式 に より 、 実 戦 感覚 で 定石 が マス ター で き こと が で さま す 。 


回 棋譜 の 画面 コビー を と 
る こと が で きま ず 。 
[付録 と し て 、 秀 策 の 棋 
譜 が つい て いま す 。 


id, 定石 位置 は 4 隅 8 方 向 自由 に 選べ る の で 、 
その 組み 合わ せ は 1600 通 り 、 又 、 付加 機能 と し て 、 
ー 手 づつ 再現 し て 見 る 事 も で きま す 。 


PC-9801U2(3.5FD) 
PC-9801M2(5FD) 

PC-8801/mkII /SR 
FM7/NEW7(5FD) 

PC -9801/E/F 


局 の 数 々 を 

① 一 手 ずつ 再現 し て 見 る こと が で きま す 。 

② 観 戦 す る こと が で きま す 。 

③ 対 局 形式 に より 、 名 局 の 数 々 を 実戦 感覚 で 
味わえ ます 。 

PC-8801/mkII /SR(5FD) 

PC-9801/E/F(5FD) 

PC-9801M2(5FD) X-1 turbo(5FD) PC-9801M2(5FD) 

PC-9801U2(3.5FD) p" FM-77(3.5FD) " PC-9801/E/F(5FD) 

"eme aq NE TTE OST ULL PT PC-8801 /mk II / SR(bFD) еее 


PC-9801U2(3.5FD) 


プラネタリウム PARTII 


Сы 


突然 、 宇 宙 の 果て か ら や っ て き 
た 正体 不明 の 敵 の 想像 を 絶する 
破壊 力 の 前 に 、 我 々 の 星 は 、 破 
減 状態 に あっ た 。 唯一 の 望み は 、 
我々 は 、 強 力 な 2 段 連 射 式 パル 
スガ ン と シー ルド バリ ア を 兼ね 
備え た 亜 高 速 で 航行 する か つて 
な い 破 壊 力 を も っ た 1 機 の スペ 
ー ス シッ プ で ある 。 
行 手 に 一 体 何 が 現れ る の か ? 
それ は 君 自 身 で 確か め て 欲し い / 
(ジョ イス ティ ッ ク 使 用 可 ) 
X1/C テ ー フ プ 版 \2.800 
X1 turbG 対 応 


年 天 回 転 方 式 


簡単 な キー 操作 で 、 世 界 中 
の あら ゆる 地点 の あら ゆる 
時 刻 の 星座 を 眺め る こと が 
で きま す 。 知り た い 星 座 が 
点 減 し た り 、 星 座 の 線 を 引 
いた り 、 又 、 星 座 の 絵 も 表 
示し ます 。 
EC-9801U2(3.5FD) 
EC-9801F(5FD) 

PC-8801/mk1I /SR 

ド M7/NEW7(5FD) 
ЕМ-77(3.5Е0) 


カロ リー・BOOK 


— x | Б a 9 < АС, SATOH. 
| つう | | x ・ 一 人 用 … コ ンピュータ と 対戦 
| と ~ NU ТАН Аш 


次 各種 の 技 を リア ル に 再現 


THi-Power SMO) ES 


テー プ 版 \4 500 
(RAM 32K 以 上 必要 ) 


本 格 対局 囲碁 ソフ ト 開発 進行 中 と う ご 期 待 


⑨⑦ お 求め は 、 お 近く の マイ コン ショ ッ プ また は 、 チ ャ ン ピ オ >: ° = ° 
vo ENSEM CAL REL E 制作 株 式 会 社 チ ャ ン ビ オン ソ フト 発売 元 チャ ン ピ オ ン ソ フト 販売 株 式 会 社 
ETCEXOS RENE Cau Б. 〒530 大 阪 市 北 区 西天満 6 丁目 1 番 12 号 本 社 ・ 通 販 部 〒657 神戸 市 灘 区 篠原 北町 

(送料 は 無料 サー ビス ) 瑞穂 ビル TEL(06365—9900 1 丁目 5 番 13 号 TE L (078)801— 2727 


SST メン パー ズクラブ を らく る こと に っ て — i 


ご どう 思わ れ ま すか 
各社 宛 に ご 意見 ご 要望 を お 寄せ くだ さい 。 
| ~, - — 
s еы, 
سے‎ ^ 
ИС зы 
5. 


$) Вотнтес 


T107 東京 都 港 区 南青山 5-12-3-204 


TEL.03(407)4191 T190 東京 都立 川 市 柴崎 国 2-2-19 カト ー ビ ル 


асот met 


T130 東京 都 曇 田 区 両国 3-22-8 
細田 ビル 2F 
TEL.03(635)5145 


2223 横浜 市 港北 区 日 吉本 町 1776 小島 ビル 
TEL.044(63) 5995 


GA. лкт» 


+154 東京 都 世田谷 区 若林 3-15-3 
若林 角栄 ビル ハイ ホー ム 406 号 
TEL.03(413) 4507 


T222 横浜 市 港北 区 篠原 東 3-1-9 
TEL.045 (421)/ 421 


Í 


*SSTZzv&4n/ 
西武 百貨 店 池袋 店 9F マ イコ ン ・ フ ォ ー ラ ム に て SS T フェ ア 開 催 。 
(3883) O6 B2-— 9 FH18B 08: С 

@ 期 間 中 、 ソ フト を お 買い 上 げ の 万 に オリ ジ ナ ) 


Т 


Т 


E 


т 
© 
a 
a 
" 
UJ 
7 
H 
a 


ЕЗ 


тт 


| 


АӘЕЖУАР”РАОО-ОП, BMEDIA 
тІ/?КПСОХИКЕНИЯНОЖ-О/ИЯЖСІ/С 
TEAREN CA ЖОС S NT БИЛ. 
その 大 き な 人 気 に お 店 えす る BIG 0012095 

Z1 ADR El WHH C 88 / 


Si c5. (c 5i U Ce. 


€ 


P, ・ 富士 通 の 最新 鋭 バ ソコ ン 


ҒМ-7712 


+5» ф 


Uirin 


44! 


Ох: 


emm OOOI-JAXC3XS$UnC.BX$* CECI SL. 
ec 
ТОООФ ЖНІЎ І, КОРАНА ‘INI — 
マン ス な エネ ルギー 源 で み 
&GOOORBt281382/»—7:-NISSUXONÓECZ, 
ФОООВВЯИСЯЫЛХЯНЖОаАУЕ 1--%. 
ОАШЯХ-»-0%й0 79: 

ҰН С. БАУУ ООО ШН EROT, AB. 107. J-52:0531. 

FEOS 5 5 7 EEL 15% 77100-91 RAPRA 189814335 — 0L! p j oz 

2090000 КӨШУДЕ LU ест Pu. Zm UNES, рия LJ РТА 

E | à ГГ). BOK) 8Z18(A). в,/20С4), 8 /Р8(Ж) «ЖЕГІ ЕЕ L[L-PESB|AT-HIZIM 

Еа. ЖЕГРИГЕДЕРЕГІЕ ІІ, ТОРА C227 Sa 240 ¿Ex 


富士 通 ク レー ブ 富士 電気 化学 株 式 会 社 〒105 東 京都 港 区 新橋 5-36-11 電話 (03)434-1271( 大 代表 ) 


で い 
22 SEN 

SESS 
р 


B 5 判 216 頁 定価 1,900 円 (〒300) 

シャ ー フ の ポケ ュ コン PC-1350/1450/2500 (S) な ど に よる ポケ 
ュ ン 通信 の 本 で す . RS-232C を 使っ た な 各 パ ソコ ン と の イン 
ター フェ イス , 簡易 言語 の 応用 な ど を 網 維 し て お り , FL 
い ぃ 通信 時 代 を 乗り きる だ た め に 必読 で す 


*RS-232CO ЖУ лу L Ə# CXPC-150072 9 — x 


の 通信 文 付録 PC- 6001 シ リー ズ と の 結合 / ク ロス ・ ア セ 
ジフ ラブ etc; 


P 


9/7h217:2173U2U-Z818($108&) 


B5 判 各 定価 Z.500 円 (300) 


PC-1211/1210 
PC-1500 第 1 集 
PC-1500 第 2 集 
PC-1251/1250 第 1 集 


|/O 編 集 部 ・ 編 著 А 5 判 496 頁 定価 1,900 円 (〒300) 
シャ ー フ ' の ポケ ュ コン PC- 1500 の すべ て を 解説 。 ゲー ム 作り 9 
の ノウ ハウ や テク ニッ ク ,。 ブロ グラ ム 開 発 の た め の シ ステ 
ム や ツー ル な ど を 満載 、 なお, 本書 は 「 ボ ケ コ ュ コン ・ ブ ログ 
ラミ ング 入門 」 と 「 ポ ケ コ ン 活 用 術 」 に 新た に 記事 を 加え 
で も 揚 ね も た も の て す 。 
ШРАСІСІН: プロ グラ ミン グ 太 門 , PC-1500 プ ログ ラム 集 
Ш> НЫ マシ ン 語 入門 。 | シス テム (7 ELI IRE 
ゲー ム (5 人 ナポレオン な ど )etc. 


A5 判 定価 1,500 円 (〒250) 
ビジ ネス マン に 欠か せな い 6 大 機能 (電話 帳 ・ 住 所 録 ・ 子 定 
表 ・ メ モ 帳 ・ 電 卓 ・ ポ ケ ュ コン ) を 1 ACHR L 722-2034 
新 デ ゲー タベース ・ ポ ケ ュ コン 「『PA-500』 の 使い 方 か ら , 実践 
的 応用 例 な ど を 紹介 . ポケ コン 応用 編 で は すぐ に 使え る プ 
ログ ラム も 掲載 し て いま す . 
DB ポケ コン 入門 編 上 ep デ ゲー タベース 基本 編 / 実 貴 編 / 応 用 編 
p ポケ コン 基本 編 / 実 践 編 / 応 用 編 etc. 


@ ソ フト ウェ ア ・ ラ イブ ラリ シリ ー ズ 第 6 集 
フ 5 判 各 定価 P,500 円 ( 二 300U) 
対応 機種 


@BAGSIC ソ フト ウェ ア 集 
明 5 判 各 定 価 1,900 円 (〒300) 
No. 対応 機種 
ы — | —. »L( 
КОО PC-124571251 | 


^. PC-BODOZU—X 


" Ne) BASIC4- (マシ ン 語 ) 


慣れ な い 


入院 し た の で , 
HF" を 移植 し て み ま し た . 
* š —PiO4 м7 жх —Z> a Z 


私 の MZ-2200 が 
PC-6601 に "ゲー 


画面 右 に 現われ る “<” を カー ソル ・ キ 
ー で 生かし, ЗӨ" を より て ТОЛУ 
54 ол ЫЛ е6 ТУА 


P.S. 


ゲー ト を 表示 する の に マシ ン 語 を 使っ て 
いま す が 。 は っ きり 言っ て 遅い . お まけ に み 


モー ド を 1, ペー ジ 数 を 1 に し , U 

スト どおり に 入力 し て RUN. 

単純 移植 じゃ な い の が いい で すね . 

EB Ë | で も 空 を 飛ん で いる よう な 感じ こ な 
る よう に し て ほし か っ た な 。 


遊び 方 に くい . と 私 は 思い ます . し か し ,PC の 性 格 


が いま だ に 理解 で き て いな い の で , 
Ш ゲー ト BASICUA bii 


REMXXXXXXXXXXX 
REMX 
REMXXXXXXXXXXX 
8 CLEAR 58,&HF7FF:DIM X( 
、DC 19) 、FC 19) 
GOSUB 1885 
SC-ü:x-380:Y27:Iz 
SCREEN 1 、 1, 1 :CLS "T 
GOTO зай 
ZZ-INTCGND( 1) X5» +5:2=@ 
A=STICK(0) :UX=0 Y= 
IF А=1 THENIFY> 1THEN UY=-1 
IF A=5 ТНЕМІҒҮ<14ТНЕМ WY=1 
IF A=? THEN IF X512 THEN х= 


23 る NEXT Ы 
FOR W-8TO I 
IF FíW»-1 GOTO 290 
LOCATE ХМ) ,Y CH» SPRINTO? 
OCATEXAD YARD DCA} PRINT" O”; 
278 YW SYW -1:DCW» 2DCH» *2: IFDC 
>ЗӘТНЕМЕ WH? = 1 
GOTO 319 
Y CH? Y CHO * 1: DCN =O} =2: 
< 2ТНЕМЕ А> ニー 1 
Й LOCATE хен) ‚тм SPRINT OIL 
\САТЕХ СИ) TEW? *DOH? PRINT" е" ; 
NEXT ИЫ 
GOSUB Sag 
LOCATE 8,8:PRINMT"SCOREz" 
peo MIC эз лай, HS; 
z2*1:IF 2«22 GOTO 118 
240 eges YCID?ZINTCRNDC1» X6» +4 
345 OCI zZINTCRNDC 1» X4*2» :FCIDPzS6 
NC2—-D€I»52 :XCI2 $98 
358 POKEXHFS13,YCI? :POKE&HF814,Y 
CI»*DCI? :POKEKHF82F , 132 
340 ЕХЕСЫНЕ8 15 
0 POKEKHF82F , 32 
j 144 
508 MzSCREENX,Y? 
iu IF M-132 THEM SC-SC*160:PLAY" 
05B9" :LOCATEX,Y:PRINT"* *; 
528 IF M-133 GOTO る 99 
5268 RETURN 
444 FOR W-a TO 2:PLAàY"OSA2R5Aa2R5 


tE 


Р ` — 


IFD« 


-- 


LU QJ vd С -- ^v 4 hi Pd 


5 


5 = 
е чо C 


il- Бір — CÓ Go D 
e - 


Dow 


IF &à-3 THEN IF х<31 THEN Ух- SC; 

c АДЫ ` Vf 
ТУ; 

GOSUB 509 

ЕХЕСУНЕЕЙВ : 560565660 

LOCATE X,Ys:PRINT"«" 

IF. Іж“1 GUTO- 325 

ST2IMHTGRHD 1» X3» «1:EM-14- INT 

CRNDG 15» X3? 

21й POKE&HF913,ST:POKEX 

215 ЕХЕСУНЕ8 15 

216 СМ=ІЧТЕ РМС 1» €?» *4:LOCATE ñB, 

CH: PRINT"O" ; 

228 FOR W=0 TO I 

E > 


235 
xX ¢> OR 


:PRINT" "3 


EY "= mn E Ç J v 


27) 
74 


トス 


"^ X 20 cà 
со (Л S 


"J ке к. к» — к» — к — | e^o ке к^ عم‎ (Д £ (U h) cS — 0) ҺӘ ہم‎ 


іш 
ы 


ХЫ» =X CHD + 1 NEX 
X(B) <32 END 
1-1:FORWH=OTOI : 
KCM+ 12 зри =рсиж 12 1 


248 
YOU =YCM+ 1»: 
E Ft t р „= =F í 


PLAY"OSCARSCAR3":NEXT MW 


つ 


442 IFCA$=" Y") DR(A$=" у") THEN 


8: 


458 IF(A$="N") 


早く し な いと , ゲー ト が 閉じ る ./ 


SCORE- 68 HI-SCORE- 178 
で の の の の の の の の の の の の の の の る の の の の の の の の の の す 6 る る 6 
фо 9999 99909 0060 00000060 s6 
°° 
> 


ФФСФееее 


TUSTE SENATUR, 
3 参考 文献 


1) 電 人 MZ : ゲート", PiO。'84 年 2 月 号 
2 ) N。。-BASIC cT JV 
3)MZ-2200 OWNER'S MANUAL 


IF 5С>Н5 THEN HS-SC 


CLS:LOCATE 12 ,7 :PRINT "E N.D 


LOCATE 18,148:PRINT "SCORE-"; 
LOCATE 109,11: PRINT "HI-SCORE 


7,19:PRINT"Tr y 
Y/N" :A$=INKEY$ 


again 


Sc= 
1=- 1: RETURN 


ORCA$-"n")THENM END . 


らら 9 СОТО $6298 


1442 
1919 FOR I 


CONSOLE8 , 15,8 ,8:PLAY"t220" 
-434887043557:КЕАбе:РО 


KEI ,Ө:МЕХТ I 
1029 COLOR 11,1,1 
1188 RETURN 


zuaa DATA 
78,395, 


20 ій DATA 


62,14,33,222,195,4,31, 
113 


43,423,16,249,42,61,32, 


243,291 


2020 DATA 0,0 
58,19,2485 
2099 DATA 


,83,82,194,17,32,0, 


71,62, 
‚248,71 


133,205, 45,248,5 


I 


2040 DATA 58,20,248,144,61,71,62 
32,208, &5,248 


2058 САТА 58 


2048 DATA 205,55,248,201, 


16,252 


,28,248,71,62,15,144 


119,25, 
,201 


17 


助け られ な か っ た 宇宙 人 さん ゴメ ン ナ サイ 
SCORE 68 


тартар 


| QPC-80007 


Ne0-BASIC 


Judi oM EL, 右端 に ある ス 
テー ショ ン に ドッ キン グ し て くだ さい . 
婦 ミ ニ PiO イ ン フ ォ メ ーション ララ ッ ク グーP PRSCURL ポー ナメ 
モー ド を 1, ペー ジ 数 を 1 に し , U が 2 倍 に な り ま す . 


スト どおり に 入力 し て RUN. お まけ 


HAV ETO, 
хь СААР КЕЯ. 


100X 面 数 が ボー ナ 
な 3s, с УФ こう ラ い ラー か は. xw 
ド の あめ っ だ な ほう が よい と も た 選 いま す . 


表 2 変数 表 


937. この ゲー ム は 最初 スク ロー ル な ど を させ 


な か な か 
s 評 な か な か 楽し 


A47 

面 数 

АБО 
宇宙 船 の X 座 標 
宇宙 船 の Y 座 標 
宇宙 船 の 動く 方 向 
キー 入力 

判定 
フラ ッ グ の 判定 


HUS よう と 思い まし た が , 遅く な る の で や め ま 
表 1 行 番号 マッ プ 
FHA ">" は, カー ソル ・ キ ー で 上 下 
に 動き , [SPACE | キー で 右 に 動き ます . 
途中 に ある 限 石 O” o "x" に 当たる と, 
Тун» Жете ТТ ала 0 09. 
“а” を 助け る と 10 点 で す . 


10—150 


初期 , 画面 
メイ ン ・ ル ー チ ン 


> 


160—250 
260-320 | クリ ア 
330—380 | ゲー ム ・ オ ー バ ー 


ШЕШ SPACE STATION BASIC リ スト 
120 PRINT "G":NEXT:COLOR 3 


リエ メニ < メロ So 


260 REM %% CLEAR'' %% 

278 LOCATE 12,8:PRINT "GOOD''* 
288 LOCATE 7, 19: sPRINT M;" MEN CL 
EAR! !" 

290 PLAY"YL14C4E4G4GFEGFEGFEDC4 
300 FOR Ісі TO MX1980XP:S-S*1 

310 LOCATE $,0:PRINT S:NEXT 

8920 D-D*5:M-M*1:CLS:GOTO 36 

330 REM ФФ GAME OVER 4% 

340 PLAY "O1S10CU":LOCATE 10,8 
350 COLOR ,,2:PRINT"GAME OVER" 
360 LOCATE 6,18:PRINT "PUSH RETU 
RN KEY!'!" 


10 REM ФФ SPACE STATION ++ 
20 SCREEN 1,1,1:CONSOLE98,14,9,0: 140 LOCATE INTCRNDC 1) X29» * 1, INT( 
COLOR 1,1,1:CLS$:92z0:M-1:0-5 RND( 12 X122 *2:PRINT "P":COLOR 1 
90 Xz0:Yz8:UVYz1:Pz1:COLOR 2 150 PLAY"OL16CDEC","OSL146CDEC" 
40 FOR 1=0 TO S31:LOCATEI,1:PRINT 160 REM ФФ START! %% 

"X"; :LOCATEI,14:PRINT"X" ; :NEXT 170 KzSTICK(0) :1F K=5 THEN り Y= 1 
50 FOR 1=2 TO 13:LOCATE 31,I:PRI 188 IF ド =1 THEN ЧҮ=-1 

NT "X";NEXT:COLOR 3 199 LOCATE X,Y:PRINT " " 

60 LOCATE 30,7:PRINT " ry" 200 IF STRIG(9)=1 THEN X=X+ 1 

Z9 LOCATE 31,8:PRINT "+" 218 Y2Y*UY:H-SCREEN(CX,Y) : IF Hz80 
80 LOCATE 30,9:PRINT" a" : COLOR 1 THEN PLAY "0559М99908":Р-2 

90 LOCATE 1,0:PRINT "SCORE";S 220 IF X-30 АМС Y=8 THEN 269 

199 COLOR 4:FORI-1TOD:LOCATEINT( 238 IF H=64 THEN PLAY "9У04С640": 


RNO( 1) X29» * 1, INTCRNDC 1) X125» +2 
110 PRINT "$":NEXT 

120 COLOR 1:FORI-Z1ITOS:LOCATEINT( 
RND( 12 X29»? * 1, INTCRNDC 12 X12» +2 


S-S$*18:LOCATE6,0 :PRINT 5 

240 IF H-131 OR Н-88 OR X>=39 TH 
EN 3238 

250 LOCATE X,Y:PRINT"2":GOTO1?76 


370 IF ІМКЕҮФ=СНЕФ ‹ 13) THEN RUN 
389 GOTO 379 


QPC-B00020-X 
| Nso- BASIC л, 


HIGH FLYING 


この ゲー Acad Mas BOE. ち 
ょ っ と 手 を 加え て 作っ た も の で す . 
* š = P107 м7 ж х —> a Z 
ペー ジ 数 を 1 に し 


ЖОЛ 

あな だ は O CH. 画面 の 上 下 に は み 

MLE 542. TE に 乗っ だ 》5 陸 りな だ り 

LT UNES "ae O Ы, カー シッ ル ・ 

キー で 左右 に 動き ます 。 まだ 。 上 の 方 に し 
る 方 が 点数 が 高く な り ま す . 

HIGH FLYING BASIC! АҚИ 


сосе 


知 い プロ グラ ム な の で , 遅い 人 で も 1 時 
問 あ れ ば 入力 で きる で し ょ う ( 久 し 振り に 
PiO に 登場 し まし ただ)。 


モー ド を 1, 


スピ ー ド も 速い し , プロ グラ ム も 短 


ы F (r, よく で きた ゲー ム で す . 


実行 する まで | スト どおり に 入力 し て RUN . 


5 LOCATE8,0:PRINT"XX HIGH FLYING 


BY.K.MIYAMOTO XX " 
18 CONSOLE1,,0,0:SCREEN 1,1,1:CL 
S:COLOR 5:Х=19 

38 LOCATERND(1)?X5,15:PRINT"TTTTT 


Tt PULITETTITIT КҮК” 
32 (ОСАТЕНМО< 1) X25,13:PRINT"TT T 


40 S-STICK(CO0) :Х=Хх+ ( (5=7) ANDCX» = 1 
J) -<(5=3› АМО(х<-29)) :5С=5С+ 15-Y 

BREAK 

50 P-SCREEN (X,Y? :IFPZ&HSATHENY- 


Y= 1 
る 9 IFP く >&kH54THENY=Y+ 1 
70 IFCY<=0) 0R(Y>= 14) THEN?9 


8S8 LOCATEX,Y:PRINT"o":6GO0TO30 


ry РКІМТСНЕФ ‹ 12) ; :LOCATES8,8:PRIN 

DOGO ME OVE R ° 

199 LOCATES8, 19: PRINT" YOUR SCORE 
" : SC 

110 PLAY"/12t2380418co2eagv12o3e 

o2bdgo3v13c 2" : END 


7) "(9 p と ころ で 。 ペン (G ペ ン , カブ プラ ベン, スク ウル ペ ベン) ほど 使い に くい も の は な いと 思っ た こと あり ませ ん か ?2 上 か ら 下 へ の 線 は 楽 な の で 
Ол Ол Тт», 下 か ら 上 の 線 は 紙 に ペン 先 が ひ っ か か る の で , 紙 を 削る な ら ま だ し も , 最悪 の 場合 、 イ ンク が は じ け 飛ん で すん ば らし い イ ラス ト が 台 
な し に な っ て し も だ あと いう こと あり ませ ん か 2 私 は その 黄 怖 を 克服 する 方 法 な る も の を 友人 か ら 聞 きま し た . 私 は その 方 法 の 意外 性 と 単 


純 が こと か ら , 驚き の あま り 35.2cm も 飛び 上 が っ て し まい まし た .* そ の 方 法 ほ と いう の は , ペン 先 の 先 っ ちょ の 方 を まっ ちの 家 で 少々 焼く と ス 


BIO 


SR 


N60-BASIC 


テイ ク ・ ア ッ プ ルズ 


таке Apples 


あな た は リン ゴ を 拾い に , 
出かけ まし た . 
廊 ミ ニ PiO イ ン フ ォ メ ーション 


熊 の いる 森 に 


モー ド を 1 ・ ペー ジ 数 を 1 e (25 y 

| スト どおり に 入力 し て RUN. 
| 自分 と 敵 と の スピ ー ド 関係 リン ゴ 
| を 捨 っ た と き 動 き が 遅く な る な ど よ 
^ | て て きま てい ます. 


REM XXXXXXXXXXXXXXXXXXXXXXXX 


20 REM X [Take apples] ж 
39 REM X А.0, 1985 Ғер.24%24% X 
40 REM X Programmer is Y.S. Ж 
58 REM X FOR PC-6001MK2 etc.. X 


50 REM XXXXXXXXXXXXXXXXXXXXXXXX 
78 CLEAR :X 1=9 :X 1 も =" 0000" 

20 GOSUB $99 

90 FM-8:JR-3:9S1-21:FM$-2"0000" 
199 FOR M5=1 TO 14 
118 LOCATE 0,М5 

120 PRTNT『・・ ユ ユー ト ユ ・ ト ・ ュ 
139 NEXT 
140 LINE(@ ,@) -(255,0) 
9?1»-(255,191»,2 

158 РС=31:М2=14:Ех=99 
160 SC=INT(RND( 12 X81» :PB=INT(RND 
て 1)%14〉+ 1 

178 JH=INT(RND( 1) X31? :L3=INT(RND 
CI12X14» 51 

LOCATE SC,PB:PRINT "4"; 
LOCATE JH,L9:PRINT "4"; 
FX-S1X5:FO0R М5=1 TO S1X5 
FP=INTCRNDC 1) #31) 
JXSINTCORNDC12X14» +1 


,2:Ь1МЕ(0,1 


LOCATE FP,JX 


250 PRINT "9"; 
268 NEXT 
270 LOCATE PC,M2:PRINT "@" ; 


COLOR 2:LOCATE 9,9:PRINT "HI 
-SCORE:" ;X1$; 

290 LOCATE 27,0:PRINT "МАМ" ; ЈЕ; 

300 LOCATE 9,15:PRINT "SCORE:";F 
M$; 

310 LOCATE 23,15:PRINT 
;:COLOR 1 
328 PLAY 

2D4EDB 1ACD 12RF4CDEA 1" 

FOR М5=1 TO 1299 :МЕХТ 
SM=9 


499 

LOCATE PC,MZ:PRINT"*."; 

РС-РС- (PA=3 J) +(PA=7) :РС=РС-‹Р 
С=-1) + РС=32) 


2=0) + ‹М2= 15) 


大 分 県 Ken ぢ . 


ムー ズ に 描け る よう に な る と いう こと で す . 
ー 応 や っ て ご らん な きる さい ませ. 


IF SCREENCFP, JX) =&H81 THEN 2 


"TIME" ; RX 


"S13M150T250L804CE4GF 4G 


SM-SM*1:PA-STICKC05 : IFPA=0 T 


880 М2-М2-«Рат5) +(PA= 1) :MZ=MZ -— (H 


390 IF SCREENCPC,MZ) -&H81 THEN б 


愛知 県 マン グー 


ーー 


жол 


カー ソル ・ キ ー で MAN "まま "を 動か し , 
fE "Ф" に 捕まら な いよ うに し て , 時間 内 に 
リン ゴ "%” を 拾っ て くだ さい. 

リン ゴブ は 10 ポ イン ト で , ボー ナス は 面 ク 
リア 時 の 残り 時 間 で す . 


sm TAKE APPLES BASICUZA F B 


OSUB 700 

400 LOCATE PC,MZ:PRINT"4" ; 

418 IF SM-1 THEN 358 

420 LOCATE SC,PB:PRINT "*";:IF M 
B= 1 THEN LOCATE SC , PB:PRINT* 9"; 
430. IF 5С-РС THEN PBzPB-GSGNCCPB- 


SCeSC-(SGN(SC-PC) 〉 
MB-0:1F SCREEN(SC,PE) =kH81 T 
MB-1 

IF SC=PC AND PB-MZ THEN 679 
LOCATE SC,PB:PRINT "4"; 
LOCATE JH,L3:PRINT "-";:IF M 
THEN LOCATE JH,L3:PRINT"9"; 
IF L3=MZ THEN JH-JH-(SGN(JH- 


L3-L3-(SGNCL3-M2)) 
MS-98:1F SCREEN(JH,L2)-2&H81 Т 
MS=1 
IF JH=PC AND L3=MZ THEN 670 
LOCATE JH,LS:PRINT "е"; 
RX=RX- 1: LOCATE 27,15:COLOR 2 

:PRINT RX;:COLOR 1 

558 IF RX=9 THEN 479 

540 GOTO 340 


570 LOCATE PC,MZ:PRINT 
580 LOCATE 13,8:PRINT 


"d^" i 
"ROUND" ; S1 
" CLEAR ir skS1=S1+ 1 

590 PLAY "T12504S13MS89FEDF2.CFE 
DFRCFAG2RSEDF GA 1" 

る 99 FOR М5-1 TO 1500:МЕХТ 
610 FM=FM+RX+ 10 

る 29 ZX$=STR$( FM) 

る 39 ЕМФ-ВІОНТ%( "0000"%БІаНТФ6(2Х% 
,LENC2X$) -1» ,4) 

648 COLOR 2:LOCATE 46,15:PRINT FM 
$; :COLOR 1 

450 FOR М5=1 TO 509 :МЕХТ 

る 29 GOTO 199 

478 LOCATE PC,MZ:PRINT "X"; 

る 89 JR-JR-1:1F JR=9 THEN 7480 

490 PLAY "V1503C1":60TO 199 

700 FX-FX-1:1F FX=9 THEN 579 

710 PRINT СНЕФ 7) ; : ЕМ=ЕМ+ 10 

720 2Х%-5ТКФ(РМО 

730 FM$-RIGHT$("0089"*RIGHT$CZX$ 
,LENCZX$) - 1) , 4) 

748 COLOR 2:LOCATE 6,15:PRINT FM 
$;:COLOR 1 

758 RETURN 


(PC シリ ー ズ の 後に つく SR の 意味 を 知ら な い 日 本 の DDT 会 津 の プラ ッ ク 


リン ゴ の 後ろ に 熊 が いる ぞ 


r. 5. 


今 。 アドベンチャー ゲー ム を 作ろ うと し 


て いま す が 。 NU mee v NS 
FERIRE SOA ЕЗ Ф Ero 
OTOS O 


760 LOCATE 11,9?:PRINT "GAME OVER 


, 
770 PLAY "T188L9/1004CDE4EDC205D 
EDCEDE2UDF . EDCR4" 
720 PLAY "DEOSC204GFEDCI" 
799 IF FM»X1 THEN GOSUB 8 る 9 
888 FOR М5=1 TO 500:МЕХТ 
8109 LOCATE 9?,11:PRINT "TRY AGAIN 
(Y/N) ?" ; 35EXECKH 1958 
TK$=INKE Y$ 
IF TK$-"y" OR TK$="Y" THEN 9 
IF TK$-"n" OR TK$-"N" THEN 1 
GOTO 828 
X12FM:2X$-STR$COCX1) 
X1$-RIGHT$€«C" 0990" *RIGHTS(ZXS 
,LENC2X$)5 —1» , 4) 
888 RETURN 
8%0 END 
9088. SCREEN 1,1,1:COLOR 1,0,1:CON 
SOLE 9,15,0,0:CLS: 
910 LOCATE 606,8 
920 PRINT" 
939 PRINT 
9480 PRINT" 
212. В" 
959 PRINT" 
Lia la 
960 PRINT :PRINT :PRINT 
970 PRINT" MAN (PLAYER) 


?89 PRINT 

990 PRINT" è 
МЕЛ зә е" 
1800 PRINT 
1810 PRINT" 
6.2....... 
1020 PRINT :PRINT 
1939 PRINT " 


ТКФ-ІМКЕҮ%: 
CL S : RETURN 
GOTO 1049 
END 

REM XXX XX X X X X X X X X X X X X X X X X X 
REM X Copyright (c) 1985 X 
REM XXXXXXXXXXXXXXXXXXXXXX 


(Take арр1 ез1 


МАМЫ ШЫ 5. «fce 


ょ よう に PPLE て 区 、 び ろ っ て く < た “で 


(つか まる と МА 


..... くま 


|b 


HIT (RETURN) 


IF TK$=CHR$( 13) 


千葉 県 カモ メ と と よ ば れる 男 


た だ し , 私 は まだ 試し て いな い の で ,。 保障 は な いで す . Eb. も の は 試し , 失敗 し て も と も と . 


・ ホ ー ル 太田 健一 郎 ) 


19 


N-BASIC 


2 年 程 前 に 作っ た , た だ 歩き (走り ) 回 る 
だ け の プロ グラ ム を, 大 幅 に 改良 し て ゲー 
Bla La UI 
廊 ミ ニ PiIO イ ン フ ォ メ ーション 


— F 


アイ デア も いい し , キー 操作 も 簡単 . 
と て も 面白 い ゲ ゲー ム で す . 


遊び 方 


3 種類 の ゲー ム が で きま す が 。, 
法 は 同じ で す . テン ・ キ ー の | は 左足 
"L", [2| は 右足 "R° c. ре, 


操作 の 方 


左足 は 右足 の 周り を 右 回 り に , |2| を 押す 
と , 右足 は 左足 の 周り を 左 回 り に 動き ます . 
グー が 。 V», V», Vv. EE 
っ た だ たら スタ ー ト で す . [1]t[2]e 4 š 
グ 良 く 〈 く 交互 に 押せ ば , 画面 上 を 自由 な 方 向 
図 足 の 動き 


10 CONSOLE 0,25,0,1: COLOR 7,32,0:WIDTH 4 
0,25:ПЕҒІМТ А-2:РКІМТ CHR$(12) 
Z0 DIM-X(7»,Y C7) T TG (2 2) 
50 DATO 8,—1,1,71,1,0,1,1,0,1,—-1,1,— 
= Т! 
40 FOR І-0 ТО 7:КЕАр A,E:X(I)=A:Y (I)=E:N 
ЕХТ 
50 LINEC1,0) - (26,24) 
(39,24) ,"89", 5, BF 
60 FOR 1-0 TO 2:FOR 1=@ TO Z2: TI$(I,J)0-"1 
0:00:00": МЕХТ I,J 
70 FOR ТК=0 TO 2:1 0САТЕ 29, 
TR+1; "GAME ":GOSUR 500:МЕХТ 
80 LOCATE 4,12:FRINT "h^ /GAME?2727(1—3) 
90 A$-INKEY$: TREVAL (АФ) -1: IF ТЕ>2 
Q THEN А-КМр(1):065070 90 
108 LINE(2,1)5(025,23)," 
UE 330,370,400: = の 
110 OX-0:0Y-Q:kX-0:kY-Q: GUSUE 180: GOSUB 
200 
120 LOCATE 0,0:ҒОК 1-0 TO 2:ВЕЕР 1:ҒОК I 
= の TO 40:МЕХТ:БЕЕР Q:FOR I-O TO 800: МЕХТ 
I,J: ТІМЕФ= "00: 00: 00": REEF 
120 LOCATE 30,22:PRINT TIME$:F=INF (Ø): IF 
F<>25% AND F<>251 THEN 130 
140 IF F=253 THEN IF H=1 THEN RX=LX+X(MNM) 
:RY-LY-Y(OM):M-zM-5:H-2 ELSE MzM*1:H-2 
150 IF Ғ-251 THEN IF H-2 THEN LX=RX+X (M) 
:LY=RY+Y (M) :M=M+3:H=1 ELSE М=мМ+7 : Н=1 
160 IF М>7 THEN M-M-8 
170 ON H GOSUR 200, 180: БОТО 150 
180 Р=РЕЕК ( (RX+X (M) ) # 2+ (RY+Y (M) ) * 120 HF. 
Z@2): IF P=32 THEN 190 ELSE GOSUR 220 
190 LOCATE ОХ,ОҮ:РКІМТ " ":QX-RX«*X (M): OY 


1,0, 


;,"B",6,FE:LINE((O7,0)- 


1*TR*7: PRINT 


OR TR 


",BF:ON TR*1 GOS 


栃木 県 気分 は ロッ クン ・ ロ ー ル 
p 突然 で す が , 


(dr 


| OPC-8000 シ ! 


福岡 市 あっ ぷる TEA 


Key さ ん が 7 H 
で ゃ 一 時 を の 話題 で も り 上 が り ま し た だ が, 


は 「 鉄 の 夕 の つい た ベル ト ・ 腕 輪 ・ 


へ 移動 で きる の で , で きる だ け 早 く 1--9 
の 数 字 を 順番 に 1 つ ず つ 踏 みつ け て 〈 く だ さる 
Uv. 

9 まで 踏め ゆば ゲー ム 終 了 で す が ,。 4 
が HOP3 に 入る よう に 頑張 っ て て だ る きい 。 


7 いだい の レベ ル は 表 1 の と お り で す . 
表 1 


ゲー ム の レベ ル 


壁 が じゃ まで 動け な いよ ーー 


LR ラン ニン グ BASIC リス ト 


=RY+Y (M) s LOCATE QX,QY: COLOR 4:PFRINT"L":C 

OLOR 7:RETURN 

200 Р=РЕЕК ( (L X+X (M) ) #2+ CLY*Y (M) ) *120+%HF 

さ の 2) s IF Р-52 THEN 210 ELSE GOSUB 220 

210 LOCATE KX,KYsPRINT " "sKX=LX+X (М): КҮ 

=LY+Y (M) s LOCATE КХ ‚КҮ: COLOR 3: PRINT"R":C 

OLOR 7:RETURN 

220 IF Ғ<>49“ТТ THEN GOSUR 230: RETURN EL 

SE TT=TT+1sBEEP 1:ҒОК I=@ TO S:NEXT: BEEF 
Q:IF TT=9 THEN ON H GOSUR 210,190: СОТО 

260 ELSE RETURN 

250 IF Р= >52 THEN MzM-*H*H--H 

240 LOCATE 0,0:ҒОК I-O TO 20: ВЕЕР 1: ВЕЕР 
Q:NEXT:GOSUR 250: RETURN 


250 IF М>7 THEN М-М-8:КЕТОКМ ELSE RETURN 


260 TI$-TIME$:LOCATE 
ATE 0,0: BEEF: BEEF 
270 TI=VAL (МІр%Ф (TI$,1))*1@QQQ+VAL (MID$ (Т 
I$,4))*1@Q+VAL ХМІр%(71%,7)) 

280 FOR I=@ TO 2:TT$-TI$(TR,I):IF TI<=Vñ 
LIOMID$(CTT$,10»0*10000*VAL (МІ0%(77%,4)2%10 
@+VAL (MID$ (TT$,7)) THEN SWAF TI$,TI$(TR, 
I) 

290 NEXT:GOSUB 200:11МЕ (2, 
,BF:GOTO 80 

500 LOCATE 28,3*TR*7:FRINT"1 
310 LOCATE 28,4*TR*7:FRINT"2 
520 LOCATE 28,S5*TR*7:FRINT"3 
: RETURN 

350 RXz12:RY- 
1=49 TO 57 
540 A=INT (RND (1) #8) *Z2*2: R2 INT (КМО (1) *7) ж 
Ki 

550 IF FEEK((A*2«*E*120-*&HF3502)5532 OR (A= 
14 AND B-12) THEN 240 ELSE LOCATE A,E:FR 


50,23:РКІМТ TI$:LOC 


1)-(25,23) 
"+TI$(TR,Q) 
"-TISOCR, 1) 
"+TI$(TR,2 


12:LX=1%;LY=12:H=1:M=2:F OR 


長崎 市 MVX の 渡辺 千 


我が家 で は ,「 へ ビ ・ メ タ は や た だら と 英語 を 使い , 
ー) の アデ アンプ グ を 使う 」 と いう 風 に 定義 (? ) され て お な おり ます (まあ , 
肖 輪 」 な どの こと で す (「 ヒ カリ モノ 」 と 「 マ ー シ ャ ル … 


これ は 日 本 の へ ビ ・ メ タ の 話 で す が … 


表 2 行 番号 マッ プ 


初期 , 画面 
ゲー ム 選 定 
タイ ム 表 示 , 
左足 表示 関係 
右足 表示 関係 
Кт, 壁 と の ぶつ か り 

終了 , TOP 3 と の タイ ム 比 較 
TOP 3 の 表示 
ゲー ム 1 の 画面 

ゲー ム 2 の 画面 

ゲー ム 3 の 画面 


80—110. 
120—170. 


キー 入力 


右足 の 座標 
左足 の 座標 
1 歩 前 の 右足 の 座標 
1 歩 前 の 左足 の 座標 
足 の 周り の 座標 へ 加え る 値 
T1$(22)| 3 つの ゲー ム の TOP 3 
TIS 自分 の タイ ム 
Ti 8904.08 
TR ゲー ム の 種類 . 
入力 し た キー の 値 
右足 , 左足 の 別 
体 の 方 向 
今 ま で 踏ん だ 数 字 


P.S. 


90 行 の ARND(1) は , 一 見 むだ な よう 
で す が , ゲー ム 1 の 乱数 の た め に 使わ れ て 
いま す 。 


X(7), Y(7) 


INT CHR$(I) 
さ 6 の NEXT: RETURN 
270 КХ-2:КҮ-22:1Х-5:1Ү-22:Не«2:М-0 :1-57 
580 FOR К=@ TO 2:FO0R 1-0 TO 2:LOCATE K«*8 
*5,J*8*4: PRINT. CHR$(I);CHR$(I):I=I-1:NEX 
Ж 
390 FOR К=@ TO 1:FOR 0-0 TO 1:LINE(J«8«8 
QK*B8*7) -CI&B*11,K X849) ,"B", G6, BF: NEXT Ј,К 
: RETURN 
402 RX-19:RY-14:LX720:LY-14: H71: M72 
410 RESTORE 440:ҒОК І-0 TO 39:READ А,В,С 
,D:iLINE(A,E0 - (C,D) , "8" , 6: NEXT 
420 COLOR 6:FOR 1-0 TO 19:READ A,B:LOCAT 
Е А,БіРКІМТ "B":NEXT 
430 COLOR 7:FOR 1-49 TO 57:READ A,E:LOCA 
TE A,B:FRINT CHR$ (1) : NEXT: RETURN 
440 DATA 2,4,4,4,2,11,8,17,2,12,8,18,2,1 
3,08,19,2,14,5,17,2,15,4,17,2,16, 3417,42 
1,8,21,5,1,8,1,5,2,8,2,5,%,8,6,5,10,9,14 
,6,9,11,9,6,10,9,13,8,53,8,5,8,19,8,20,9, 
4,10,4, 11,23,17,22,1241, 12,2,12,20, 12,22 
450 DATA 12,15,16,12,15,16,17,12,13,22,1 
5,22,14,8,14,10,15,9,18,9,15,18,18, 15,15 
,19,18,16,16,1,16,2,16,19,17,18, 15.5608, 
3,19,4,21,4,19,5,21,5,19,6,21,6,20,23,2 
25 21. 7521 9,22,9,22,9,22,12,22,16,24,6 
.25,6,24,12,24,16,25,12,25,19 
460 DATA 2,17,2,22,4,20,7,10,12,6,12,10, 
14,4,14,18,16,6,16,12,18,4,18,14,18,21,1 
9,19,20,17,20,22,21,20,22,18,25,21,24,19 
470 DATA 17,1,9,1,9,12,2,23,6,14,5,20,16, 


15,25, 24 12. 12 


倉敷 市 迎 夢 快 人 と JUNKO 
号 の 編集 後記 で いっ て いた ,「 ハ ー ド ロッ ク と へ ビ ・ メ タ を いか に し て 見 分 ける か 」 に つい て 一 言 二 言 。 我が家 


叫び , 化粧 し て , ヒカリ モノ を 好み ,。 マーシャル 
Р РТМ Б ЕРТ 


» は ある ミ ュー ジ シ ャ ン の 言葉 を 無断 引用 きる せ て 


РС-ВООО:/ 


N-BASIC 


Q 


この ゲー ム は 。, いま まで PiO に 載っ て い 
た 釣り ゲー ム に 物足りな さ を 感 じ て 作 り ま 
し た . し か し , 最初 か ら ミ ニ PiO に 出 そ う 
と し て いた の で , 制限 され た も の に な っ て 
し まい まし た が 。 どう か 人 遊ん で や っ て くだ 
さい . 

娘 ミ ニ PiIO イ ン フ ォ メ ーション 


実行 する まで | リス ト どおり に 入力 し て RUN 、 


。 | ポイ ント ご と に も っ と 変化 を つけ た 
Е | >, より 面白 い ゲ ー ム に な っ た で し 
JI 


遊び 方 


まず ポイ ント を 入力 し ます (どの ポイ ン 
ト が 一 番 よ いか な ど は , 変数 表 や プロ グラ 


г 


ム を 見 て くだ さい ). そ の と き ル アー を 引っ 
掛け た ら 投 ば げ 込み 失 敗 で す . 
投げ 込み が 成功 する と , ゲー ム が 始ま り 


ます . [a] ょ [6| で ルアー "v^ を 障害 物 に 
当 だ ら な いよ うに 左 冶 に アク ショ ン る きせ 。 


10 WIDTH4Q,25: CUNSULE の ,25,0,1: COLOR1:FRI 

NT CHR$(12); SPRINT " Ere w"gow ee 
By T+ S" 

50 P-23000:3-0:R-0 

40 ІЕК-5ТНЕМ5ОО0О 

45 COLOR7:PRINT " Reb n 

355/259 Залу/ж 

50 PRINT " 

03972 

60 PRINT :INFUT " TOUT 

1ОКМ >5ТНЕМВЕЕР : БОТО 60 

70 ON м GOSUR 1000, 1010, 1020, 10350, 1040 

80 PRINT СНКФ (12) ; : IFH2RND(10GOTO 2000 

85 FOR Ісі ТО 40:G1-INT (КМО (1) #59) +1: 62= 

INT (КМО (1) +24) +1: COLORA: LOCATEG1 ,G2: PRIN 

T "4": МЕХТ 

90 J-0:X-20:Y-2:D-0:FORL-1TOZ2Q0 

100 COLOR1:LOCATEX,Y:PRINT "е" 

110 ҒОКМ=1Т05: А=ІМР (0) : IFA=191ANDX < 39THE 

NJ-J*1:LOCATEX,Y:PFRINT " ";X=X+1:GOSUB10 

QOQ:LOCATEX,Y:FRINT "а" 

120 IFA-239A4NDX?2THENJ-zJ-*1:LOCATEX , Y: PRI 

NT " "s:XzX-1: GOSUE10000: LOCATEX , Y: PRINT 

"nay" 

130 IFA-223ANDH«RND(1) THENJ=J+5: ОСАТЕХ, 

Y: PRINT " ": ҒОКІ=1Т70400: NEXT: LOCATEX , Y:F 


1497 RM F 2 
483797300 ` бі077279 


テ ^ スカ "iN: IFN& 


いい だ だ きま も だ け 。 


リー ズ 


OR 保 


を 沈め ます. た だ し ルアー を 沈 
め る と 引っ 掛か りや すく , まだ より 大 き な 
アク ショ ン を する こと が で きま す 。 5 な ジル 
アー は 自動 的 に 巻き と られ , 画面 の 下 ま で く 
変数 表 


| 5| で ルアー 


魚 が 寄 っ て 〈 る 確率 
ルアー が 引っ 掛か る 確率 
釣れ る と 取れ る 点数 

スコ ア 

持ち 金 

魚の X,Y 座標 

ルアー の X, Y 座 標 
ルアー の アク ショ ン 数 

魚 が 出 現し て いる か どう か 
ルアー を 投げ た 回 数 

ポイ ント の 入力 

障害 物 の X, Y 座 標 

キー スキ ャ ン 

yes か no の 入力 
FOR-—NEXTH 

ルアー の 座標 に ある キャ ラク タ の 
読み 込み | 

釣り ゲー ム BASIC リ スト 


K 
E 
T 
S 
P 
Q 
X 
J 
D 
R 
N 
G 
A 
Q 
I 
2 


1 ルアー 


RINT "г" 

IF 42223 AND Н>КМр (1) 
GOSUE 1 の の の の 

NE XTV 
IFD=1THENGHSUE さ の の 

IF J>25 AND K«RND(1)THEN GUSUE 
LOCATEX,Y:PRINT " ":Y=Y+1 
GUSUE 1 の の の の 

163 NEXTL 

165 PRINT CHR$ (12) :РКІМТ "тлу !!'!":R-R 
+1: GOTO 40 

500 LOCATE 01,02:РКІМТ " " 
505 Q1-X*INT(RND(1)*8)—-4:Q2-7 
*2)*1 

504 IFQ1+3 
505 D-1:COLOR1:LOCATE 01, 
510 RETURN 

900 PRINTCHR$ (12) : COLOR 6:PRINT "777 / € 
yn N "PIR Ў SCORE N "84^" 3 
910 IF Ғ>0 GOTO 40 

920 FOR Ісі TO 400: EEEF 1 : BEEPO: BEEP1: ВЕЕ 
PO:NEXTI:PRINT " GAME OVER !'":END 

1000 К-.01:Н-.1:Т-10: RETURN 

1010 К=.017:Н=. 2: T-50: RETURN 

1020 k-.024:H-.3: T-90: RETURN 

1050 К=.051:Н=. 4: T2110: RETURN 


1 さら THEN 2000 
137 
140 
145 
150 
160 
162 


500 


Y * INT (RND C1) 


2390R01-:-0THENQ1-X: RETURN 


Q2:PRINT "кас" 


ә“ 
` 


Д 


—— s 


1040 к=. 
2000 PRINT CHRS (12) 3 COLOR2: 


PiO 


お いし い ? エサ だ よ , さあ お 食べ 


る と, その 投げ 込み で は 釣れ な か っ だ と い 
また QNT. 

結局 。 要 は ルアー が 全部 巻き 取ら れ な い 
うち に 魚 "Mao 2#š%u:, kd の 部 分 
に ルアー を 合わ せ て 釣れ ば よい の で す . 

も し 魚 を 釣る と 金 に する か どう か 開い て 
くる の で , 指示 どおり に 進め て くだ さき さい. 

この よう に し て 金 が 0 円 以下 に な っ だ ら 。, 
ゲー ム ・ オ ー バ ー で す . ちな み に ル アー が 
引っ 掛 が る と ルアー 代 600 円 , 5 回 投げ 込 
む ご と に 体力 が な く な っ て , 食料 費 500 円 


が か か り ま す . 
P.S. 


非常 に 稚 押 な 文章 ほ と 上, プロ グラ ム で すけ 

れ ど 勘弁 し て くだ さる さい. これ か ら も どん ど 
ん プロ グラ ム を 発表 し ます の で よみ ろ しく 
お 願い し ます . 


: T=1 30: RETURN 
ҒОКІ-170500:В 


038:H-. 


EEF1:BEEPO:NEXT:FRINT "ルアー 9 ヒ ゅ カケ テ *600 


Ў. 


ルアー Э no ''":P-zFP-600:R-R*1:FORI-1TOA4Q0 


00: МЕХТ: БОТО 900 
2500 END 


%@@@ 


5010 
":0%: 
5020 


2.2 


COLOR6: BEEF: PRINT CHR$12):PRINT " 
PITIA TAFT DUTT TTTS НИКА 

FRINT: INPUT "YNT? ANII 力 エマ ヌカ (y/n) 
1Ғ0%<>"у"ТНЕМ S=S+T:GOTO 900 

РКІМТ:РКІМТ " 7729» "$;10«*T;"Fl?7"» 


41/2": PzP-*10*T: FORITZ1TO4000: NEXT: GOTO 


920 


5000 PRINT CHR$(12): COLOR2: 
n9 т 
5010 PRINT " 


BEEF:PRINT "> 
= ヌル ":К=0 
5008 ":P-P-500:FORI-1 


FITA TS San 


1:37 


т04000: МЕХТ: СОТО 900 


10000 2=ҒЕЕК (НЕТ02+Хж2+үж120) : 


IFZ-&HE2T 


HENS の の の 
10010 IFZ=&HEDTHEN さ の の の 
10020 RETURN 


(沢登 英樹 ) 


21 


MZ-1800-80K/C 


7 Ни-ВАЅІС 十 ( マ シン 語 ) 


アス テロ イド ・ ウ ォ ー ズ 


ASTEROID WARS 


@We 


実は この 作品 は 旧 バ ー ジ ョ ン が 一 度 ボ 
ツ に な っ た よう な の で , 改良 し て 再 投稿 し 
た も の な ん で す . 

* š =PiO4 ио +X — > a Z 


実行 する まで | リス ト どおり に 入力 し て RUN・ 


hel 


自 機 位置 アド レス 
UFO 位 置 ア ドレ ス 
ミサ イル の 発射 タイ ミン グ 用 
キャ ラク タダ タ 分岐 用 


Q 
G 
22 白く で き て いま すね . . R: 
" 115 一 | ハー ト 取 っ た E 
遊び 方 ОШ | ゲー ム ・ ォ ー バ ー Е 
| 1000 一 | コー ルド ・ ス ター ト x 
à қ -2000— | ホッ ト ・ ス ター ト > 
ぃ ん 石 と 敵 の ミサ イル を よ け つ つ 。 ビー и . 
w > Е 2H. ың à M( いん 石 の 位置 計算 用 
ム で 敵 の UFO を 破壊 し て くだ さい . ем s ШШ Кл 
аңық(1- 3) ERS (FS FA ОС の と き 命 中 率 が 259% 以 上 な ら お まけ プレ イ T 仮想 画面 右上 端 ア ドレ ス 
レベ ル 分 け ) に 比例 し て 高く な り ま す . ま が あり ます . x ті ا‎ 
ы, ハー ト を 取る と , 距離 に 応じ て ボー ナ | キー は [|p|E[c| で EF, [SPACE |] で で о d gus 
ス が 加算 され ます . ー ム 発射 で す 。 700 で も 動く ん じゃ な いで u N —< 自 機 移動 用 増分 
敵 の ミサ イル は いん 石 を 消 減 き せま す が , 5% と 自 機 残り 数 
tur ち ら の ビー ム は いん 石 を な か な か 破壊 で J> グラ 
き な い こと が あり ます . UEO の 数 の 変化 H ラム PRINT CHR$(30) を 除い て くだ さい ( ス 
に 対す る スピ ー ド 調整 は わざ と や っ て いま マシ ン 語 は スク ロー ル と ミサ イル で 。 b ビー ド は 沙 ち る ). 
せん. ら つ き を 少な くす る だ め 少 し 長い で す . “£ 書き 忘れ まし だ が 。 ブ レイ ク し だ ら 


ゲー ム ・ オ ー バ ー は ミス 3 回 で す が , こ れ で も ちら つく と いう 人 は , 1010 行 の RUN 1OOO と し て くだ さい . 


DIM КС2959),М<15›,С<2955),0<2), J( 15) 
FOüRRH-1TO12:MCR»2R: JTCH う =H+1 : NEXT 
KCRSCC"D"55z-40: KCRSCC"C"55740 
KCRSCC" "›)›=1:Н1=@:Р1НУ7:С=@:М5=1 
С(852-1:С(2242-2:С<1122-5:С(1202-4 
С(722-2:С(6023:,15122--1:М(062-12 
.SWz&e: FORR-&HCaBaTOSHCOae6asTEPS: C=0 
FORB-GaTO?: RERDZ: D-URL C"&H" +Z 2 
POKER*B; 0: C2C*D: NEXTE 
RERDZ: IF C&»URLC"&H" *Z»? THENSW-R 
MEXTR: IFSUTHENPRINT"CHECK SUM ERROR IN":4(CSu-&HCOaGe» ^8» 
*5+ 1100: END 
1138 DATA 5Е,0Е,11.ҒО.СС-21.ҒЕ.СС,0411 
1148 DATA SD: 28: 15: d1: OD: Ad: ED: BA: 0225 
1158 DATA 26,56,00, OE: 1C, 03, ES Di, 024A 
11668 1B: 18. ED. 88, Gà, aa, ao, ao. 0120 
1170 11:00, 0E; 21:FF; CC: SE: EB, 0329 
1180 81; GE 00, ED, B1; EA: 38, CO, 38F 
1190 19: 28: 1D; GE; 18, 03, 18. Fa, 0193 
1200 SF» SE, 48: 2B; 2B; BE, 28, 02; 921B 
1218 1E; 080,73. 23. 56, 00. 23, SE. 814B 
1220 EQ, 13: EQ: 00, 00, да, aa, aa. a1D3 
SE: ЙЕ, 11.Рр,00,21,Р0. CC. 0414 
SD: C8: 601- QE: O4: ED» BO, ӨЕ, 92BF 
1A: 89. EB; G9. EB. 18, F1. 00, 030B 
営ま まま まり ト 。 ズ タッ ァ ト 
CLS:R=%HD8080: D=&H400: SG=H+ 1 さ +4* ネ 49 
Uzp*135412*40: Т-П%26%6ж40-р: U74465 
FOREZGTO2: Q(B) ZR*B*23*12*40: NEXT 
х=: E-0:L 23: Sizà: I=0:J=0:US=1 
H-18:F-8:G-260: =1 
FüRRHZeTO18: LOCATE1 2: A 
PRINT" ":SPCC1425" |" NEXT 
PEEUDIAPUINQUC o Th 
OIE EC Ы Т" aoa" 
FOKEU; 29: PRINT"HIGHESSS": НІ: "ДӘП" 
POKEU; 29: PRINT"SCOREBSSSS":»: "200" 
POKEU; 29: PRINT"LEFT8SS":L: "22500" 
FOKEU; 29: PRINT"BONUSBSSSS":E: "дӣ" 
PF=" ま EEEEEEEEEEEEE" 
LOCRHTE1:11:PRIHT"D 91022221028 Н12108С 35" 
LOCRHTE2;13:PRINT"LSP1 FIRE!" 
LOCRTE12; 3: PRINT "FF EF TF EF RF OF IF DF " 
(ОСНТЕ12,.4:РКІМТ" WERE SE" 
LOCRTE15;23:PRINT"CLVNCO SOF Te" 
FOüKEU: 12: PRINT"CHU» NO.2 VERZ. й"; 
FUSHS: РОК Н-57019:5-5%4й 
MEME 5-0, 142=МЕМҒ CS, 14): NEXT: POPS 
ONMSGÜSUBSaaa 
(ОСНТЕ17,12:РКІМТ"КЕНОУ '":PLRAV"R9":LOCRTES1;168 
ONSWGOTO:18:FOR Я=@тоі 
FLHY "C4GCRGC4GCROCAGCROCGARR " 


8 GüTO1860 j 
û R=INKEY$C0): IFR=""THENN=@ELSEN=K (ASC CR) > : ONNGOSUE6A 


U=U+NI ONCCPEEK CU-D2 2+160Т028, 120,500: U-U-N 
ЕОЕВ=@ТОЕ: IFPEEK (Q(E > =1 29GOSUESQ 
A=INTCRND( L)*3-15*48: IFCCPEEKCGCE) 82) CO STHENG CE? -OCED «8 
ON INTCRND( 1 )ж626050Е70: NEXT 
H=H- 1: ONHGOSUE19g 
CRLL&HC000: ONC (PEEK CU» 260701 20,500 
POKEU, 235: ҒОКВ-йТОЕ: POKEQCB) 199: NEXT 
POKET*INTCRND(12*132*48; 72: GOTO18 
HHHH E" -G kd | 
EO Z=MEM ま CU+Z, 122 : C-MC INSTR(Z "Н" 2) : POKEV-D+J (C2, ІМТСЕМОСІ) 
ж29ж72: MEM ま CU+2。 じ ッ =P+ Мей: Je Je 1 : RETURN 
ЕТІЛЕДІ 
70 POKEQCE)-D. 224: RETURN 
Gà PLAY "eCa Al G0": POKEQCB)» INTCRNDC1 «152+241: 1=1+1 
BS X=XVTPRINTX3 "30 ";:POKEU,30:0NF+180T095: 1FB く >FTHENSMRPG 


CF) GCE? 
эй FzF-1: RETURN 
95 SWAaPQCGO s OCZ): FSRNDCIDX3: G=RND ¢ 1 F20: Y=F +G: 67220-G: RETURN 
188 4£iXi£n-HM9 no 
185 РОКЕТФІНТ(ЕНО(12ж122ж40-1,72,85:Н-4й 
118 E-E*10: RETURN 
115 *£XEEn-M9 bes | 
120 POKEU-H.; û: POKEU, 235: X=X+E PLAY" GI7R1":PRINTX"SG "::LOCRT 
Е50,16:РКІНТЕ: "80 "::LOCRTES6; 16: 0001020 
SAO RHR T-a. A-0 - 
518 CRHLL&HCOG00:POKE V, 2355: PLAY" GSFOGSFA" 
528 FORA=ATO1 4: CALL&HCAAQ : POKEU; ІМТСЕНОС12%ж152%241:Р0КЕ4514. 
FEEKtRH*106)5: CALLES 
ҒОРВ-0Т080: NEXT: NEXT: CALL F1 
FORRzZaTO255: РОКЕ4514, A: CALLES: NEXT: CALL 71: POKEU ; G 
L-L-1: IFL2»8THEHEZE-S6: Е=-Еж*‹Е>а) : Suz1: GOTO26056 
LOCRHTE32; 13: РЕІНТ "а": М=1/7: M2INTCM*182085^/168 
LOCRTE14, 18: PRINT "キキ アナ タリ セー セキ キリ 
LOCRTE14; 12:PRINT リッ メイ チュ の ウリ 9 3 M; "S" 
POKE&H1181;8;2: CRLL%H44 
FOR RB-aTOINTGM»x16 
K-X*1:LOCRTE368; 10: РЕІНТХ; "80 ": МЕХТ 
PLAY" ай": IFCH224RHDUS» =#ТНЕМЄ580 
LOCRTE14:; 16: FRINT "CHALLENGE ! ! " PLA ""F4^G^4G^Rhe"F4"7G^4 
GT HT GORI" 
648 L-L*1:W5z60: 50702050 
650 IFHICXTHEHHIZXE:PLR''""E4"E"F"E"F"Q"7G"F6" 
666 LOCHTE17?:14: PRINT"RESTRT?": 
era IFINKEV$C15«»"N"GOTOZ28168 
688 PRINTCHR$CG312*"IE":EHD 
аса まま まま きま コ ォ オルト" 。 ス ター ト 
1818 CLEHRSHEFFF s: DEF INTA: E. D-1:L. O, 5-4: DEFSTRZ, P; Е: PRINTCHR 
$ 38? j 


p 7 月 号 p68 の MOST さ A, 私 も 一 応 プ ロレ ス フ ァ ン で す . レイ ス と ニッ ク の ファ ン な ん て し ぶ い で すね ー. 私 は 特に 好き な レス ラー は いま 
せん が 全日 派 で す .。 あ っ と , それ か ら p.138 の プロ レス の … き さん,。 ブロ ディ が 新旧 へ 移籍 し た の は WWF に 入っ たから では な く 。 新旧 が プロ 
ジェ クト を 作っ て 積 格 的 に 引き 抜い た ん で す よ . 大 人 金 を 使っ て . まあ 企業 戦争 で すか ら そ ん な こと は いい ん で す が 。 新 時 の キレ イ ご と に は あ 
きれ て し まい ます .。 し か し プロ ディ は ほん と に WWF の リン グ に 上 が る ん で し ょ うか ? 現時 点 で は (6/8) 上 が っ て ませ ん が …、 と ころ で 


9i0 


ASTEROID WARS BASIC リ スト 


2278 PLRV"C4RCRBCARCROCARCRACRARR " 

2280 MEXT:GOTO 10 

5000 ЕЕЕ исы 

5019 М6-0:КЕ5Т0ОКЕ5040:1 ОСЯТЕ14, 6: FORA=1 ТО? : POREU; 14: RERDR$: 
PRINTR$: ВЕЕР : NEXT 

5020 LOCRTE13;17:PRINT"PUSH ANY KEY IP+CHR ま を (4) 


5й5й _DHTH 了 ステ ロイ ト ~ ニオ イエ > 
3060 DRTRHEUFOn" эдт”! 
3070 DHTH セ ント の ウキ さ キヨ モッ テ 。 
3ase DATRETf3hh4ét3!'' g 
3098 DRTR9nJ^oT mE 


3188 DRTRHE2^?25t3» 


5050 CALL&HCAAA: PLAY" TALRETAL " : RETURN 
5040 ОЯТЯжж 2-20 жж 


Hu- BASIC 


OMZ-700/150 


Today, PiO'85 年 1 月 号 を 見 て いた ら , 
"あん ち ・ じ ゃ いあ ん つ "” さん の "Super 
Baseball" が 目 に つき まし た . + = С 
は ,「 取 る の が ある な ら , 打つ の が あっ て も 
cc; ҰЛЫМ この ゲー ム を 作り まし た 。 

女 ミ ニ PiO イ ン フ ォ メ ーション 


f す る まで | リス ト どおり に 入力 し て RUN・ 
2. バッ ト を 振る シー ン が と て も いい で 
“ Ti. 


内 容 は , “30 球 中 何 本 ホー 
る か ご と いう 


ラン 者 て 


10 COLOR,O:P223:0-0 
М1%-"- их " 

20 РКІМТ "8": COLOR4 

50 LUCATE 1 25: РКІМТОТКІМСФ (38, "Ш" ) 

40. FORIZ15TO23: LOCATEO, І: PRINT"g":NEXTI 

50 1%=1 МКЕҮФ: COLOR6 

60 LOCATES3, 1: PRINTUSING" - 457: 8" $H 

70 LOCATE16,1:PRINTUSING"G 7“ 4%W#+f3922 0" $K 

ВО LOCATE29, 1: PRINTUSING"Zh?47: ##" $0 

90 COLORS:LOCATE22;,22:PRINT"x";j 

100 COLORS: LOCATE37,22: PRINT"*'"j 

110 IF І%-"Ш" THEN K-K*1:GOTO160 

120 IF I$" " THEN COLOR3:LOCATE37,22: PR 
INTM$:PAUSE1:LOCATES36, 22: PRINTM1$:PAUSES 
:LOCATE36,22: PRINT" x**"$:0-20-*1 

130 IF O23 THEN 240 

140 IF К-51 THEN 250 

150 GOTOSO 

160 FORI-1TO15:LOCATEF*I-1,22:PRINT" "; 

170 COLOR7:LOCATEP*I,22:PRINT"*"; 

180 I$-INKEY$:IF I$-" " THEN 200 


М%="х Ei. ы "y 


も の で す . キー 操作 は . [T] 


キー で ピッ チャ ー が ボー ル を 投げ , 


s ag で バッ ター が 打ち ます . © 
の と き , たり 具合 に よっ て ホー ムラ ン に 


2< A 
な っ か が り 。 セッ ト は な っ な だ な ササ し ます 


まだ バッ ト を 振っ だ と き , ボール に 当 だ 
ら な か っ だ ら ス トラ イク と な り ま す . し か 
и, “ЖА” は スト ライ ク に は だ なり ま 
せん . 

ピッ チャ ー が 30 球 投げ 終わ っ だ た だり 、 ス トラ 
オク 3 に な っ だ 6 ゲ ダー バ ・ オ オーバー で 7, 


PS. 


ホー ムラ ン 競 争 BASIC! A F 


190 NEXTI:GOTO 50 

200 COLORS: ОСАТЕЗ7, 22: FRINTM$:FAUSE1:LO 
САТЕЗФ»22:РКІМТМ1% 

210 IF PF+I= さ 6THEN FLAY7,"*BO*A":GOTOS60 

220 IF Р+1=35 OR P+1=37 THEN PLAY7,"*GO-* 
F":GOTO290 

250 IF P*I«»36 THEN 0O-0-*1:GOTO20 

240 COLOR2:LOCATE27,1:PRINT"89»776 アウ ト ! 


250 COLOR7:LOCATE25,3:PRINT"REPLAY ?(Ү/М 
)":PLAY7,"C6D2bEFOGAB*CBAGFE2DCS" 

260 I$-INKEY$:IF I$-"Y" THEN 10 

270 IF 1%-"М" THEN END 

280 GOTO260 

290 R=INT(RND-( 1) ¥5) +4: COLOR7: LOCATE33, 20 
SPRINT XID 

ЗОО FORIZ1TOR:LOCATES7-I,22-I: PRINT"."j: 
NEXT 

310 FORI-1TOS: LOCATE37-R-I*2, 22-R-I:PRIN 
T"."$:NEXT 

320 FORI-1TO4:LOCATES7-R-6-IX2,22-R-3: PR 


折っ だ ボー ル の 曲線 を PRINT す る 部 分 


フフ ッ , ホー ムラ ン 率 が 高い だ ろう 


変数 表 


NR сз MN X 

O A242 |I |FOR-NEXT | 
к [mmm |Б лохан | 
[R ama |н лэ | 
バッ ター асла | 


PIERRE RADE SOG RASUL То EXER 
か 。 いい や り 方 を 知っ て いた だら 。 PiOPiO 
た で も 書い で だ ああ: 


INT"."$:NEXT 
330 FORIZ1TOS: LOCATES7-R-14-I*2,22-R-3*I 
ІРКІМТ".4% МЕХТ 


540 FORI=1TOR:LOCATE37-R-20-I,22-R+I:PRI 


NT". "ps NEXT 


350 PAUSE4:0-0:GOTO20 

360 COLOR7:LOCATES3, 20: РКІМТ "\7+ -2/": FOR 
1=17010:1 ОСАТЕЗ7-І, 22-І: РКІМТ". "3: NEXT 
370 РОКІ =1Тт05:1 ОСАТЕ28-1 %2, 12-І: РКІМТ". " 
5: NEXT 

280 РОКІ =1Тт04:1 ОСАТЕ18-1%2,7:РКІМТ"."%:М 
ЕХТ 

390 РОКІ =1Т05:1 ОСАТЕ 10-12, 
: NEXT: PAUSE4: О=0: Н=Н+1 

400 PLAY4,"EOREFGA4FORGRFRES": РОКІ =1Т07:С 


7+1:РКІМТ". "3 


(01 0К1:1.0С8Т7Е9,9:РКІМТ"Я - 4 3 > !":PAUSE 


1: NEXT: GOTO20 


受験 も 終わ り , ゲー ム で も 作ろ うか と 思 
っ て 作っ た ゲー ム で す . 
* š —PiO4 МУ +X — > a Z 


| 実行 する まで | リス ト どおり に 入力 し て RUN . 


ちょ っ と 単調 か な ? で も な か な か 
面白 いで す よ . 


遊び 方 
Be rwe cx AAAS 


私 は 長州 力 が 嫌い です . は っ だ り の 店 いす ぎ で す よ . 


> ーー m. aae t 


ハン モン を ラリ アッ ト で ぶっ 倒す と か … 
それ を 許さ きず 、 それ 以上 の 長州 コー ル で 打ち 消し て し まう わが まま な 長州 ファ ン も 嫌い で す . 反論 受 


@MWUSHA | 
d 


ОСЕ ЛЕ 分 ( 事 ) を 動か LT 


(CH sv ЖРА 20 5179, iio» 
っ だ りす る と ゲー ム ・ オ ー バ ー で す 。 点数 
は 1 つつ 移動 す る ご と に 1 点 。 も を 取る と 10 


NTT. フロ グラ ム 


ゲー ム の 速度 が 速 す ぎる と 思う 人 は 。 


100 行 と 120 行 の 間 に FOR 一 NEXT の 空 ル 


ا ا 


だ ん だ ん と コン トロ ー ル が 難し く な る 


сен одао за 


Б 
Y 
x 
ki 
M 
М 
* 
Ы 
* 
к 
+ 
М 
М 
x 
¥ 
¥ 
¥ 
° 
% Фу 
И 

¥ 


М 
ТТТ ЧУЛУ ЧҮЧҮ 


FOR~NEXT IL — 7 Fi 
自分 の X, Y 座 標 
X, Y の 増加 値 
| スコ ア 
キー 入力 用 


ー プ を 入れ て 速 き を 調節 し し て くだ きい. 


. それから, 相手 の レス ラー の コー ル が 起こ る と 


(ぽっぽ SL) 


23 


Pi 


1 時間 も か けず に 作っ た ゲー ム な の で | — も の に な っ て し まい まし た 、。 5 な み に 僕 の 最高 得点 は 3366 点 で す 


REM RUNNER 290 FOR I-O TO 3B:CURSOR 1.0 


REM Original Game No.9 ш THEN Ү1=-1:Х1=0 ЗОО PRINT"*X";:CURSOR 1.24 

КЕМ Mar.3,1985 THEN Y1=-1:X1=-1 310 РЕ1МТ"#";:МЕХТ 

320 FOR 1=1 TO 23:CURSOR 0,1 

550 FRINT"*X":i:CURSOR 38,1 

540 РКІМТ"Ұ"%:МЕХТ: RETURN 

350 CURSOR X,Y:PRINT"3"; 

360 MUSIC"-CO-E-C-E-ED-E-C-E-C-E-E-ESC-E 


REM by MUSHA $= THEN Y1=1:X1=0 
CONSOLE 50,24.С40,М = THEN Ү1=1:Х1=-1 
FRINTCHR$(6) : TEMPO 7 $= THEN Ү1=0:Х1=-1 
GOSUB 290 ($= THEN Y1=-1:X1=1 
Х=1:ү=1:Х1=1:ү1=1:6=0 ($= THEN Y1=0:X1=1 
5=5+1 ="3" THEN Ү1=11Х1=1 
PRINTCHR$(5) : "SCORE"; S 220 CURSOR X, Y 
IF RND(1)».1 THEN 90 О PRINT" "j 580 CURSOR 15.10:PRINT"GAME OVER" 
CURSOR INT(RND(1)X37) +1, INT(RND( 1) X2 X=X+X1:Y=Y+Y1 390 PRINT:PRINT:PRINTTAB(13): "PUSH [CR] 

<) 1:PRINT"4"; 250 IF (X<1)+(X> さ 7) *(YX1) *(Y223). THEN Z || KEY" 

90 IF RND(1)>.O5 THEN 110 : 400 GET K$:IF K$-CHR$(13) THEN RUN 

100 CURSOR INT(RND( 1 ) %37) +1, INT (RND (1) ж IF CHARACTER$(X,Y)="&" THEN 350 410 GOTO 400 
23) «1: PRINT"$"; IF CHARACTER$(X,Y)-2"$" THEN 5=5+10: 

110 CURSOR X,Y MUSIC" +CO+E" 
120 FRINT"®"; .280 GOTO 50 


комета 
570 FRINT CHR$(5):"SCORE":S 


か わせ た … か な ? 


シリ ー ズ 
ае 十 ( マ シン 語 ) 
チョ ー ジ ン ・ レ ー ス 7?85 


€ YOJIN RACE '85 E 


PiO'85 年 5 p 3 0, "MAYACCYU NI ワー クエ リア 


雲 を 動か す 

X, Y 座 標 を V-RAM ア ドレ ス に 変換 
Y 座 標 に より 車 の 大 き さ を 決め る 
自分 の 車 を 消す 


RACE'85" の 移植 版 で す . 雲 を 動か し て 表 1 アド レス ・ マ ッ プ 
が まし も た が どう で し ょ う .。 D14F, 50 | 自分 の Y, XER 
娘 ミ ニ PiO イ ン フ ォ メ ーション |0151, 52 | 相手 の Y, X 座 標 


相手 の 方 向 
相手 の カウ ンタ 
ぶつ か っ た か の フラ グ 


実行 する まで | リス ト どおり に 入力 し て RUN. 


相手 の 車 が 急 に 曲がっ て くる の は ち 


て いま す よ . 車 の 移動 は , |4| で 左 , [6] で 右 , ギ ァ ・ | DO06F | 相手 の 車 移動 
チェ ンジ は |AI で ハイ , [| で ロー で す . _D0CF | 車 を 描く 
プロ の グラム е 0055 Азлан 
= DIRE ант o 
原作 同様 RUN 直 後に マシ ン 語 デー タ を к. ады ا‎ dsos 
読み 込み ます . 間違い が ある と エラ ー が 出 REL TEH ‹ UENS N is; 行 番 | 
Bot, サス ト と も にらめっこ し て くだ あい 。 号 710 の マシ ン 語 デー タ の 2 番目 の 08 を 増 だ る きい. 


や し て みて 〈 く だ だ るい.。 £UT, fri 240 


の エラ ー 処 理 を 書き 換え る か 消す か し て く 
# CYOJIN RACE '85 BASIC U д F ШИЕ 


400 LOCATE7,0:PRINTUSING"44HEERA" ; HI: LOCA 
ТЕЗ5,@: PRINTUSING"4$"3 СА 

410 LOCATE16,19:PRINT"HIT СКЕТЈ" 

420 CALL &HDOOQ:PAUSE 2:IF ІМКЕҮ% (0) «СНК 
$(13) ELSE 420 

450 SP20: DA-80: SOUND7 。&HSE : SOUNDB8,16:8 
QUND11 , DA: SOUND13,12 

440 LOCATE19,0: РКІМТОЅІМСБ"###### " ; SC 
450 POKE &HD14F,20,18:CALL &HDOE9? 

460 A$-" READY! ": 60508 "MSG" 

470 POKE &HD151,21,8,0,11,0 
K-INSTR("ZA",INKEY$(Q))11FK THEN 


660 DATA 2Е,89,ҒЕ,11,00,2Е,85,15,1р,ҒЕ,0 
В,П0,2Е,81,15,10 

670 DATA C9,24,4F,D1,CD,SF,DO,2E,21,CD,2 
E,D1,20,51,D1,55 

680 DATA CD,2C,D0,74,CD,3D,DO,2E,20,C5,C 
D,33,D1,C14,C9,3A 

690 DATA 51,D1,FE,14,:8,07,21,07,12,22,5 
1,D1,7D,3C,CD, 3D 

700 рата 00,Е5,21,54,01,25,20,20,0Е,04,Е 
D,SF,91,B9,30,FC 

710 DATA C6。 の 8 。77 。ED 。 SF ,OF 。 の F 。E6 。 の 1 。20。4 
F,D1,6F,34,52,D1 

720 DATA BC,38,01,2D,7D,32,53,D1,20,53,D 
1,24,51,D1,84,67 

730 DATA 2C,E5,8:,67,CD,2C,DO,E1,ED,78,F 
E,20,28,02,25,0D 

740 DATA 79,93,4F,ED,78,FE,20,28,02,24,0 
£.22,851.,D4,£1,C5. — - 

750 DATA DS,ED,69,0C,2C,15,20,F9,D1,CD,E 
1,00,10,20,Ғ1,С1 

760 DATA с9,5Е,28,92,81,4Ғ,00,04,С9,24,4 
F,D1,34,2E,00,FE 

770 DATA 34,20,01,25,FE,36,20,01,24,7C,F 
E,07,30,01,24,FE 

780 DATA 1E,38,01,25,22,4F ,D1,CD,2C,D0,2 
6,00,ED,78,FE,20 

790 DATA 28,01,24,0C,0C,0C,ED,78,FE,20,2 
8,01,24,7C,32,55 

88u рата D1,0D,0D,0D,11,0:2,04,2E,89,CD,C 
Е,р0,2Е,26,СВ,А0 

810 DATA 11,05,04,05,Ер,69,0С,15,20,ҒА,П 
1,CD,E1,D0,1D,20 

820 DATA F2,C9,CD,00,D0,CD,51,DO,CD,6F,D 
の ,CD 。E9 。D の 。C 。 の の 

830 рата の の 。 の の , の の 。 の の 。 の の , の の 。 の の 。 の の 。 の の 。 の の 。 の 
の , の の 。 の の , の の 。 の の 。 の の 

840 LABEL "PCG SET" 

850 DEFCHR$(32)zSTRING$(24,CHR$ (0) ) 

860 RESTORE870:FOR 1I=&HB1 TO &H94:READ А 
$:DEFCHR$ (I) =HEXCHR$ (A$+A$+A$) : NEXT: RETU 


100 REM 

110 REM 

120 REM 

130 REM CYOJIN RACE '85 

140 REM 

150 КЕМ JR-200 Cyojin-Game JUFC 

160 REM 

170 REM Cz-800 ANT 

180 КЕМ 

190 КЕМ 

200 КЕМ 

210 CLEAR %&HD の の の :MIDTH 40: INIT: С_54: DEF I 

NT A-Z:CLICK ОҒҒ:КВОҒ ОҒҒ: С-0 

220 FOR I-s&HDOOD TO &HD1SF ` 

230 READ A$:4-VAL("&H"*A$) : РОКЕ I,A:C= 

C+A 

240 NEXT: IF C2-28753 ELSE PRINT"Error іп 

DATA": BEEP: END 
БОБОВ "PCG SET":PALET 5,7:FALET 1,5 
LINE (24,16) – (295,955) ,PSET,1,BF 
CIRCLE (70,27) ,28,5,. 2: РАІМТ (70,27) ,5 
CIRCLE (115,530) ,53,5,. 19: PAINT (115,30 


CALL &HD1421C$-MID$(C$4C$,8-SP,8) 
: DEFCHR$ (149) =C$+C$+C$ 

500 FOR 27-0 TO (DA-20) * さ 』 NEXT 

510 IF SP= の AND DA<8Ø ‘THEN DA=DA+10 
520 IF SP-1 AND DA»20 THEN DA=DA-10 
550 SOUND 11,DA:IF PEEK(&HD155) THEN 
560 

540 5С=5С+5Р#+9+ 1:1 ОСАТЕ19 。 の sPRINTUS IN 
6"######”";5С 

559 GOTO 480 

560 . SOUND7,&H36180UND12,20: SOUND1 3, 0: C 
ALL&HDOS1 

570 CA=CA-1』LUCATE さ 5 。 の 』 PRINTUSING"4";C 
А: PAUSE 10 

580 ІҒСА THENSQUND12,0: 5010450 

590 LOCATE16,19:PRINT"GAME OVER":FORI-QT 
016: CALL&HD の の の 』 PAUSE2: NEXT 

6 の の IFSC>HI THENHI-SC 

610 GUT0U さ 9 の 

620 DATA 11,55,С0,01,22,22,р5,С5,6В,7А,С 
6 。 の 8 。 67 。 さ の 。 24, 21 

ыза Бата 28,C8,19,E5,CD, 1D,DO,D1,C1,0D,2 
Q,EB,E1,C5,44,4D 

640 DATA Ер,78,25,42,4В,Ер,79,15,С1,10,Ғ 
2,C9,7D,87,87,87 

650 DATA 6F,84,4F,26,00,06,:0,29,29,09,4 
4,4D,C9,11,03,04 


CIRCLE (240,32) ,23,5,.241PAINT (240,32 


CIRCLE (200,40) ,59,5,.14: РАІМТ (200,40 


LOCATE4,0: PRINT "HI "SPC (10) "SC"SPC(13 
) "CAR" 
320 COLOR2:LOCATE27,6:PRINT"&  &":LOCATE 
:0,8: CGEN1 
550 FORI-1TO16:PRINT" ^4 
340 COLORA4:PRINTSTRING$(17-I," HF"); 
550  COLOR1:PRINTSTRING$(I*2," "); 
360  COLOR4: PRINTSTRING$(17-I," F") 
370 NEXT: CGEN: COLOR7 
580 НІ-5000: С%-НЕХСНК%("ОЗАЛААЗҒ5дААЛААҒ5 
") 
590 5С=0: СА=5: SOUND 1 , 4: SOUNDS , 30: SOUND7 , 
&H3E: SOUNDB , Ø: SOUND 1 2 , 2 


AA с P こん に ち は , 絵夢 絶 斗 で す . 最近 , 機械 語 を 勉強 し 始め まし た . 機械 語 を や ろう と 思う 何様 ヘー 一 PMURIZZSOA2I— REI! 複雑 な 
Ол (о) 命令 も な いし , スッキリ し た 機械 語 プ ログ ラム が 組め る (私 の 愛 機 は MZ-2200). €t» 6, ВЕНЕ S b ET L US ЛЬ iZi 私 も 
Cw. 最初 は を そん な も の で し た . し か し 、 案 ずる より 生む が や すし の こと わざ の と お り 、 や っ て みる と 意外 と 簡単 で す ( 特 に Z80A). P.S. 機械 語 で 


с 
А d p: な に か や っ て みよ うと いう わけ で 。 ASCI コ ー ド 表 が プロ グラ ム を 作り まし た . 実行 し て みて 、 機 械 語 の 速 き を 改め て 実感 し まし た (ほとん 


RN 


e60,00000101071D3C36,7bEFFFF81000OFFE7 


の 6 , 42BDC さ E77E の の FF の の , D6D6ECFC18F89060 


CO, 9 の 9 の 9 の F の FB1CO6 の くさ , の の の の の の の 0 の 999 の 0 の の 


(X1 シ リー ズ 


Hu-BASIC 


870 DATA 0:04040C17171F06,CO202030EGEGFG 
BB の рата O0O0008080EOBB3C6C,6R6B373F181F09 
890 DATA の の の の の の の の の の の の 9 の の 0 , の の の の 9 の の F 1F さ B69 


900 DATA の 1 の 1 の 1 の E1E さ 1 さ F さ 1 , 8BØC7EFF87387D8 


7,01E3F717CEED1BE7,80808070D88CFC8C 

910 DATA SBSF191COFQ070405,F7F8FF7F10FF27 
CO,EF1FFFFEOBFFE4Q0:5,DCFC9838FOEO2O0CO 
920 LABEL "MSG" 
930 LOCATE16,19:PRINTA$ 
940 FORI-QOTO12:CALL &HDOOQO:C$-MID$(C$*4C$ 
,8,8) : DEFCHR$ (149) :C$*C$*C$: PAUSE 2:МЕХТ 


ШЕЕ «ЕР ИН 


ディ スプ レイ を の ぞい て みよ う . お や , 
2-44 COLOREM. どうやら 。 シア シン 
国 ( あ な た の 国 ) と マゼンダ 国 と が 戦争 を や 
っ て いる よう だ . 間 を 飛ん で いる の は ブル 
ー 国 の 輸送 機 の よう だ . この 国 は 一 応 中 立 
国 の は ず な ん だ けど … 
жЕ PON シグ ォ メ デー 


で | リス ト ど お り に 入力 し て RUN - 


4 面目 は まさ に アイ デア の 勝利 / で 
すね . 


> E 


"COLOR, t4. e» v? 


€97* Dw? ファ リン タッ ァ 

° c———————————————————— t 
10 WIDTH 4OQ:CLR:DEFINT A-Z:CLICK ОРЕ АФ- 
CHR$ (29) : U$=CHRS C30) +A$+A$: D$=CHR$ C31) +A 
%-А6 
20 M$=" HH "+06+" |"; 
oO" ss C$z" "+U$+" 
BC$-z'"|^"-D$4A$-".^L«" 
50 SC=Q: 0=5: К=1: TM$-"e":MEN-1 
40 U-7:MUSIC"OSFSEDAGWFOA4" 
50 CLS4: X=18: Ү=22:ТХ=18: ТҮ=4: ВХ=0: ВҮ=12: 
MM= の 』 TM-Q:GOSUBS10 
60 S=STICK(@) 
70 SX=( (5=6) ж (Х<=54) - (824) * (X222) ) +2 
80 LOCATEX,Y:PRINTC$:XzX*SX: LOCATEX , Y: CO 
LOR 5:PRINT M$ 
90 IF STRIG( の ) AND MM-Q THEN ММ=1:МХ=Х+1 
:MYzY 
100 IF ММ-і THEN GOSUBR180 
110 R=RNDx 1 : STX=((R= の ) + (TX く <= さ 4) - CR21) *(T 


T$z"- wnr" RD$ "Ф" : B$= w 


" А CC も = " " *D$-" " 1 


E 3N SI 


の プロ グラ ム ( 特 に ゲー ム ) に は ほとん ど ( 全 部 ?) 機 械 語 を 使う の が 痛い ほど わか り ま し た . 


@ プ ロッ タプ リン 


遊び 方 
[4][6| で 移動 , | SPACE | で ミサ イル 発 
SEC. 敵 機 は 7 回 ミサイル を 当て な いと 
破壊 で きま せん . 敵 機 を 破壊 する と , 面 ク 
リア (6 面 ま で ある ) で , 500 点 入り ます . 


P.S. 


"COLOR" と いう 割り に は , 暗い 画 
画 に な っ て し まっ だ な あ ….。 
COLOR 星 ・ 戦 争 BASIC リ スト 


X >=2) ) #2 
120 LOCATETX,TY:PRINTCC$:TX=TX+STX:LOCAT 
ETX,TY:COLOR 3:PRINTT$ 
130 R=RND*1:IF (R=Q) + (TM=Q) THEN ТМ=1:ТМ 
Х-ТХ%1:ТМҮ-ТҮ 
140 IF TM=1 THEN GOSUB260 
150 IF BX= さ 4 THEN (ОСАТЕВХ,ВҮ:РКІМТ" 

"s BX= の 
160 ВХ=ВХ+1:1 ОСАТЕВХ 。 BY : COLOR 1:PRINTB$ 
170 GOTO69 
180 LOCATE MX,MY1PRINT" 
TY THEN 200 
190 IF CHARACTER$(MX,MY)s"O" THEN 240 EL 
SE LOCATE MX,MY:COLOR 6:PRINT"A":RETURN 
200 IF TX+1=MX THEN 220 
210 ММ=0: RETURN 
220 MUSIC"C21:D2"1MM-0: SC=SC+50: = リー1 1608 
UB さ 1 の 9: IF Мей THEN 320 
230 RETURN 
240 COLOR 2i1LX-RND*39:LINE (MX , MY) - (LX, Y) 
QUA"IMUSIC"F2:E2": IF. (X く <=LX) *(X+2>=LX) T 
HEN 350 
250 LINE (MX,MY) - (LX, YO ," 


"sMYzMY-21IF MY= 


" s MM=@: RETURN 


Q9 CURIOUS 


Ший — i. 


CYOJIN RACE'85 BASIC!) X F 


950 CGEN1:COLOR1: LOCATE16,19: PRINTSPC (9) 
s CGEN: COLOR7 : RETURN 


プル ー 国 に ミサ イル を 当て て し まっ た … 


“ミニ EiO イ ン フ ォ メ ーション "大府 
成 / そ ん じゃ る さい ならっ つ 。 


260 LOCATETMX , TMY: PRINT" 
TMY=Y THEN 280 
LOCATETMX,TMY: COLOR 4:PRINT ТМФ: КЕТО 


"3 TMY=TMY+K: IF 


IF X+1=TMX THEN 350 

TM=Q: RETURN 

RETURN 

COLOR 7:LOCATE4,1:PRINTUSING"SCORE # 
44H44"; SC; : PRINT" лэ "04," テキ "gU: 
LUCATE さ 4 , 25: PRINT" Жу" МЕМ: RETURN 
520 COLOR 6:1 ОСАТЕТХ,ТҮ:РКІМТ BC$:1IF K«3 

THEN K=K+1 ELSE ТМФ= "о": К=1 

550 SC-SC*500:0-0-*1:MENZMEN*1:IF MEN=7 T 
HEN MEN-1:K-1:TM$2"e" 
540 GOTO4Q 
350 COLOR &6:LOCATEX,Y-1:PRINT BC$:MUSIC" 
В2: А2": 0=0-1: GOSUB310: IF О=@ THEN 370 
5602 GOTOSQ 
570 COLOR 


2: LOCATE15,10: PRINT"GAME OVER" 
:LOCATE11,15:PRINT"LHIT RETURN КЕҮЈ" 


380 IF ІМКЕҮ%-СНК%(15) THEN 50 ELSE 580 


Z80A バンザーイ ! ! 


(және) 


25 


英 の 戦車 が 攻め 込ん で きた ! 


2 š / 
зуб SS \ 
= = - tn A 


ee 


ESLE} -BIP" HR" 


20? ? $E, 死 の 商人 “PiO 重 工 " は , X よく ある ゲー ム だ けど ,。 ブロ グラ ム の メ 
砲 用 の 「 地 面 を は ね る 弾 」 を 開発 し た . し チャ クチ ャ る か ら , オリ ジ ナ ル と わか っ て で す の で , ね ら う と き は 気 を 付け た 方 が よ 
か し , その 情報 は 簡単 に も れ て , ライ バル い だ だ ける の で は と 思い ます . で "し ょ う 。 


会 社 の “無人 特攻 戦車 " の 攻撃 を くら うこ キャ ラク タダ と 音楽 の モン ス が 悪い の で 


いや に な っ た だら | BREAK | で 止め て くだ 


と に な っ た 。 適当 に 変え て くだ る きい. さい. 

幸い に も , 基地 に は 傾き だ け 変 えら れる , 空 に 出 て いる 太陽 と 雲 は 飾り で す . ¿+ < 改良 な ど 
旧式 の 大 砲 が あり , 君 は これ で 基地 を 守れ に 意味 は あり ませ ん . 
と 司令 を 受け た . イメ ー ジ の 合わ な い 音 楽 得点 の 計算 は 画面 に 出る 計算 を CINT し 27%, 自分 の 弾 で し ょ う . PSET の 1 ド 


と と も に ,。 さあ スタ ー ト ン ノ 
廊 ミ ニ PiO イ ン フ ォ メ ーション 


| リスト どおり に 入力 し て RUN. 


最高 で す . この プロ グラ ム ・ サ イズ 
で , と て も 楽し め る ゲー ム で す . 最 
後 の 壮絶 さ が ま た な ん と も スゴ イノ 


THUET. 

最後 に . ボー ナス と し て 87" の 角度 で 敵 を 

や っ つけ る と , 3000 点 入り ます . し か し , 

これ で は ほとん ど ゲ ー ム ・ オ ー バ ー の 寸前 
変数 表 


ッ ト の みな の で , すこ し (大 変 か な ?) 見 に 
くい と 思い ます 。 CHIRCLE で や っ だ た だら , 
遅く な っ だ の で 断念 し まし た . 

それ と と, さき ほど 触れ まし だ が 。 キャ ラ 
22, 音楽 な ど は , 作者 の セン ス が うか が 
えた る の で 。 好ま な よう に し て て が だ ゼ ぜ 攻 Mx。 


遊び 方 


| ステ ッ プ 数 P。 S. 
: は ね 返り の 係数 i түзете н 
[4]. 19| で 角度 を 決め て 。 | SPACE |С RANK 527 al жай 本 当 は , 横 か ら 見 だ ゴル フ ・ ゲ ー ム を 作 
発射 . 戦車 は 面 の 終盤 に な る ほど , 積極 的 砲台 の 角度 ろう と 思っ て いた けど 。 どこ で どう 間違え 
に 攻撃 し て くる よう に な り ま す . 6 面 周期 ЖЕХЕҮ た の か , こん な ゲー ム に な っ て し まい まし 
で スピ ー ド が 変わ り ま す . BASIC な の で Wocov rm АЯ 


スコ ア 
戦車 の X 座 標 
戦車 の ステ ッ プ 
戦車 の キャ ラク タ 


基 が 速く な る と 弾 が 遅く な り ま す . ご めん プロ グラ ム 自 体 , あん まり 整理 され て な 
voi, 結構 楽し め る スピ ー ド が 出 ま し た . 


FM-7 っ て , も う 32? 年 も 昔 の 機種 で し ょ う 。. 


Жок, 


フロ グラ ム 


% REM ファ ン ñ ト w テ そ で D.K, 
WIDTH 40, 25: RANDOMIZE ТІМЕ/З 
SCREEN 7,0 : 60508 930 

SCREEN 7,7:8$-"000000" 

GOSUB 1120 
Gz29.8:STz.2:E7.4:P-73.14159/1860 

К=50: X=0: Y=150: SC=0: ZzO: RO-O .. 

CLS: LINE (0, 151) ~ (639, 158) , XOR, 4, BF 
LINE (0,150) – (50, 140) ,PSET, 7 

CIRCLE (0,150),5%,7,,.75 

PAINT (10,150), 7, 4:RESTORE 920 

FOR I=@ TO 3:READ KX,KY,KH 
CIRCLE (KX, KY) ,KH,7,.606 

PAINT (КХ,КҮ),7:МЕХТ 

FOR I=@ TO 359 STEP 45 

LINE (80, 15) -(BO*COS(I*P)*35, 15*SIN(I 


from K.A 


#P) #15), PSET, 2: NEXT 


CIRCLE (80,15),25,0,, ,,F 

CIRCLE (86, 15) , 26, 2: PAINT (806, 15) , 2 
LOCATE Ө,20:РКІМТ " カフ ト ~ 30°" 
SYMBOL (0, 152) 。"[6]-[4] CtSPC1",1,1,0 
LOCATE 20,20:PRINT "SCORE 000000 pts 


H=620: ROZRO*1: КК=8: К=5- ( (RO-1 ) МОр6) 
LOCATE 15, 10: РКІМТ "ROUND"; RO 

PLAY "て 15 の 59m さ の 9 の 9" 。 "+ 15 の 5 の 9m さ の の 9" 
PLAY "o4cB8c8eBe8rBeBeBe8g2c4r4", "о4с 


2c4c4o3r8g8g8g8o4c4r 4" 


550 
360 
379 
386 
590 
400 
416 
420 
439 
440 
450 
460 
479 


IF PEEK(&HSCO)«»0 THEN 250 
LOCATE 15,10:PRINT SPC(9) 
, С MAIN 3 
PRESET (XX, YY) : X20: Y=150 
I$-INKEY$:KKsK:IF I$z"" 
IF 1%="4" AND K«87 THEN KsK*1 

IF 1%="6" AND K> さ ② THEN К-К-1 

LOCATE 5,20:PRINTUSING "##";К 

COsCOS (KK*P) *S0: SI2SIN (KK*P) #22 

LINE (6,1506) -(CO, 150-S1) , PSET, © 
CO=COS (КжР) #50: SI-SIN(K*P) #22 

LINE (0, 150) - (CO, 150-51) , PSET, 5 

GOSUB 750 

IF 18<>" " THEN 590 

VX2COS (K*P) #100: VY=SIN (K#P) *44: 0=0 
SOUND é4, 20: SOUND 7,55:S0UND 8,16:S0 
12, 8: SOUND 11,0:SOUND 12,0 

XX2X: YY=Y 

X=X+VX*ST: Y=Y-VY*ST: VY=VY-G*ST 

IF Y>15@ THEN Y=150:0=0+1 ELSE 570 


THEN 476 


610 


p PC-1246 の 隠れ コマ ンド を 見 つけ まし た 。. 


爆発 の キャ ラク タ 


CANNON BASIC リ スト 


540 Yz150: VXzVX*E: VYz-VY*E 
550 SOUND 1,8: SOUND 6,06: SOUND 7,62: SOUND 
8,16: SOUND 12,5: SOUND 11,0: SOUND 15,0 
560 IF VY«S THEN 380 
570 PRESET (XX, YY) 
580 PSET(X,Y,7) 

IF X>=H AND X«H*15 AND Y>145 THEN 62 


GOSUB 750: GOTO 510 

ü АР „ДР 

PUT@A (H, 143) -(H+15, 150) , BZ, PSET 
SOUND &,25: SOUND 7, 55: SOUND 8,16:50 
12,15: SOUND 11,0: SOUND 15,0 

640 LINE (48, 174) - (607, 199) , PRESET, 。 BF 

650 LOCATE 3,22:PRINT "L(faUJ]*L72h" -251/C 
IY 95b" +11/10=point" 

660 ソ =CINT(H (K-25)/ (0+1) /10) :1 ОСАТЕ 3,2 


~ 


620 
630 
UND 


570 PRINTUSING "L444J*L 44 -251/0 ## + 
11/10=#####" s3 Hs K3 OV 

680 IF K=87 THEN LOCATE 3,24:PRINT STRIN 
G$(19,232):" 87° BONUS +3000"; : V=V+3000 
590 SC-SC*V:S$-RIGHT$ ("O0000"+MID$ (STR$( 
SC),2),6) | 

700 LOCATE 26,20:PRINT 5% 

710 LINE(H,143) -(H*15,150) 。 PRESET, , BF 
729 RR=RR-1 : IF RR<9 THEN 210 ШЕ 
736 H=420: GOTO 580 Ф 
740 ° [ туу?» 1 

756 7-7%1:ІҒ Z«R THEN RETURN ELSE 7-0 
750 HHzH:HzH-C:IF H>62@ THEN Н=220 

776 FsF-1:1F F<@ THEN F=INT(RND*19) : CC=I 
NT (RND*16) : C-CC-RR 

786 LINE (HH, 143) -(HH+15, 150) , PRESET, 。 BF 
796 PUT@A(H。 145) -(H+15, 150) , AX, PSET 

вод SOUND “4, CC*2: SOUND 7,55:80UND 8,16: 
SOUND 12,0:SOUND 11, 40: SOUND 13,10 

B10 IF H<4@ THEN RETURN 1920 ELSE RETURN 
826 RETURN 

830 ' 0122456789abcdef -0123455789abcd 


DATA 06600000000000000—20200202020020 
DATA 7770000000000000—-02200020022022 
DATA 00777066666650000-00202062026202 


DATA 60006666665666000-200235202220220 


この 前 , 


4 


(lk 2 C £334. | 


886 DATA 060060666666666000—-022222265602262 


20 


890 DATA 00355555555535550-20226202252522 


eo 


92 


916 DATA 


20 


926 DATA 


. 900 DATA 06333333333333333-02232622062632 


0055535353555500-002032095022202 


320, 20, 100, 400, 30, 80, 530, 10, 85, 


600, 50, 100 


936 FOR I=9 


940 


TO 7:READ А% 


FOR J=@ TO 32 


950 FSET (J, I, VAL (MID$ (АФ, J*1, 1 ) ) ) 


960 


NEXT: NEXT 


976 DIM АХ (235), ВУ (25) 
986 GETEA! 0,0) – (15,7) 。 AX。6 
999 БЕТА (17,9) – (32,7), ВУ, 5 


1000 
1019 
1020 


CLS: RETURN 
d [ GAME OVER 1 . 
FOR !=5 TO 95: SOUND 13,606: SOUND 12, 


6: SOUND 7,7: SQUND 8,16: SOUND 6.1 


1030 
6 

1940 
10950 
1960 
1970 
1080 
1990 
1100 
1110 


“140 


1130 
1140 
1156 
1160 
1170 
1180 
1190 


(ІМЕ(30,150)-(КМржо40, RND*150) , ХОК, 


СІКСІЕ(29,150),1ж2,2,.2,.%5:МЕХТ 
LINE (120,59) – (520, 135) , PSET, 2, BF 
SYMBOL (140,55), "GAME OVER", 5,5 
SYMBOL (155,100), "SCORE "+5%,4,4,5 
LOCATE 26,18:PRINT" REPLAY [Y] " 
LINE (320,144) – (511,151), XOR, 3, BF 
FOR I=@ TO 560:NEXT 

IF ІМКЕҮ%<>"Ү" THEN 10990 ELSE 160 
, t TITLE 1 


CONSOLE O, 12: A$=" CANNON" 


SYMBOL (0,48), A$, 13,6,7,,XOR 

SYMBOL (2,49), A$, 15,6,7,, XOR 

FOR 1=1 TO 3 STEP 2:SCREEN I 

FOR J=@ TO 2:LOCATEO6, 1 1 
PRINT:NEXT:NEXT:SCREEN 7,7 

SYMBOL (200,100), "– サイ ジュ ウ MOL t» - 


"5, 3545, 9, , XOR 


1200 
1210 
1220 
1250 


0,25: 


PC-1246 を いじ くっ て い だ ら 。 CK00E 上 いう へ ん な コマ ンド を 見 つけ まし た 。 
CKOO| ENTER] | と や る と 2 と 表示 きれ , 何 か キ ー を 押す と 液 曲 の 約 半 分 が 表示 きれ ま す . も うぅ 一度 キー を 押す と 作 度 は さっ き 表 示さ きれ な か っ 
た 分 が 表示 され 。 も う 一 度 押す と 画面 は 消 を えて し まい ます が 心配 いり ませ ん . 電源 を OFF に すれ ば 戻り ます . 
| (陸上 部 の 柏木 さん , 


A$-"PUSH ANY KEY" 

SYMBOL (2060,170),4$,4,2,5,, XOR 
SYMBOL (202,171),4$,4,2,6,, XOR 

IF INKEY$-"" THEN 1250 ELSE CONSOLE 
RETURN 


まず 


8 月 23 日 誕生 日 お めで と う ) 


ーー 一 к к. = ` = 


[FM- フ シリ ー ズ 


BASIC 


グル マキ 


X 軸 の 移動 量 を Y 軸 へ の ワー プ エ ネ ル ギ 
ー に 変え る 装置 を 搭載 し た 「PIO-1( ピ オ ・ 
ワン )」 号 を 操っ て , ひたすら 他 の 車 ( と い 
う よ り バギー) を よ け て くだ さい . 
жі PIO > 7 # 2 —> = > 


リス ト ど お り に 入力 し て RUN . 


| よく ある パタ ー ン で す が , 
| いう シカ ケ が 良い で すね . 


ふろ ぐら お 


ォ ー ル BASIC で 特に 変わ っ だ こと は し 
て な い の で す が , キー の 判定 と 道 か ら は み 
だ る な いよ うに する 処理 を IF 文 を 使わ な 


ヴー プ と 


16 DEFINT A-Z:COLOR7,1:CLS: WIDTH46, 20: X= 
11: Y217:DIMS1X(9):Y171:X1711: X2212: X さ =1 の 
: FDRI= ら TO9』 КЕАр517 (1) :NEXT 

20 Bi-O0:E1-0:S-1:LINE(0,0)—(400,199) „PSE 
T,4, BF: SYMBOL (410,25) , "742",9,5, 2: SYMBOL 
(425,65) , "ta-7-",5,2, 6: LINE (400, ©) - (400, 
199) 。 PSET, 2: COLOR7: LOCATE25, 10: РКІМТ"Ф H 
I-SCORE ¢": ОСАТЕ5Ф,12:РКІМТ HI:LOCATE26 
.14:PRINT"e SCORE e" 

50 PUTG(X*16,Y*10) -(X*16*15, Y*10*10) , 81X. 
,PSET,O6:A$-INKEY$: SOUND 7, 55: SOUND 8,16: 
SOUND 6,63:S0UND 11, 7 の : SOUND 12, ©: SOUND1 
5,8 

49 IF Y1= の THEN X1=X: X2=RND (1) #25: X32 RND 
(1) ж25:5=5+1 ELSE IF 8<39 THEN LOCATEX1 。 
Y1:COLOR12:PRINT" ":LOCATEX2,Y1:PRINT" " 
:LOCATEXZ, Y1:PRINT" " 

(50 R1=RND( 1 ) 42: Х2=Х2+ ((R1810 ж CX2«222) 一 (( 


UC. АРС 5 COT. 
それ に は , 100 行 で 論理 式 の 組み 合わ せ 
で や っ て いま す 。 参考 に し て .〈《 だ ゲ き い 。 


3:073 


fio t «[2][a]|e] eC tfe C < (77 
きい. 得点 は , 他 の 車 の 一 団 を よ け る ご と 
С, だ っ だ の 1 点 も ら え ます 。 

SCORE が 3 で 割り 切れ る と き に , 青い 
車 は 絶対 に が つか る コー ス を と り ま す 。 с 
の まま で は ぶつ か っ て ゲー ム ・ オ ー バ パー に 
ШТЕТЕ РОС, ワー プ ブ も て た だ る ぁ 
L^ 


クル マキ ョ ー ン ソー BASIC! AF i 


Кі=0) ¥ (X230) :RR1=RND ( 1 ) *2: X さ =X さ +((R1= の ) + 
(X3«23) ) 一 ((R1=1) *(X さ > の ) ) sY1=Y1+1:IF S MO 
D 326 THEN X1=X1-(X1<X)+(X1>X):IF 5>29 T 
HEN X2=X2ー(X2<X)+(X2>X) 

60 PUTG(X1*15, Y1*10) -(X1*16*15, Y1*10*10) 
,S1X,PSET, 1: РОТЕ (X2*16, Y1*10) - (X2*16*15, 
Y1*10*10),S1X,PSET, 2: PUTR (X316, Y1*10) – ( 
X3*16*15, Y1*10*10),S1X,PSET, 6: IFY1>17 ТН 
ENY1-6:LOCATEX1,18: COLOR12: PRINT" ":LOCA 
TEX2, 18: PRINT" ":LOCATEXZ,18:PRINT" " 

76 IF (X1=X OR X2=X OR X さ =X) AND Y=Y1 TH 
EN 119 

80 E1-E1-(A$-"4") - (A$-"5") : B1-B1- (A$-"B" 
):IF E1520 THEN COLOR= (7, 2) 

90 IF E1520 AND АФ-" " THEN Ү=Ү-В1:Е1=0: 
B1=9』 COLDR= (7, 7) 

199 LOCATEX, Y* (8240) :SCOLOR12: PRINT" ":LO 
CATE36, 16: COLOR7: PRINTS: X=X+ (A$='" 6") (X4 


青い クル マ が せま っ て くる ./ 


し か し , ワー する に は 大 量 の エネ ル ギ 
ー が 必要 な の で , エネ ルギー を だ め て くだ 


る い . その 方 法 は , た だ だ 左右 に 動き まわ れ 
ば いい の で す . エネ ルギー が 満た され る と 
SCORE が 赤く なり まず (ワープ 
| SPACE | キー). 

ワー する 距離 は 前 に 進ん だ 分 だ け 飛 び 
まず (や っ て みる と わか り ま す ). 


Р.5. 


ある 得点 まで いく と 数 々 の 怪 現 象 が 超 こ 
り ま す .. 著 じ た で くだ る い ( く っ … 暗 い ) 


24) -(Q$="4") * (X20) 2 YY* (8$2"2") *(YX17) -( 
A$-"B")*(Y210):GOTO3O0 

110 SOUND 11,10:500М№р 12, 50: SOUND1 3, の: SY 
MBOL (20, 30) 。 "GAME OVER", 5, 4, 2:IF S>HI TH 
EN HI=S 

120 COLOR= (7,7) : SYMBOL (25,90) , "HIT ANY K 
EY",4,2, 1: A$2INPUT$(1):GOTO 20 

130 DATA 960,-7129,-17247,-1,-6937,1248, 
-6169,-17347,-1,-7417,960 

140 * gaagaaaaagagoaaagagaagaagagaagaagaggoadadu 


150° п а 
160 ? п フル マ キョ ー ソ ー (for FM-7) п 
170 ” a 1985 x 05 M 09» 日 o 
180 " O Language: F-BASIC(var.3.0) п 
190 * о by. MEOU (Т.К) n 
200 " a n 
210 ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ 


27 


| BC-3000+BABIC ЕМЕ ША/ B 


BASIC ЕМЕ! ША/В 


君 は カン フー の 達人 で ある . 強い カン フ 
ー の 達人 が いる と 聞く と どう し て も 倒し た 
447 

そん な ある 日 , と て も 強い や つが いる と 
Мол, 孝 は 倒し に 出かけ た .。 は た し て 。, 
題名 の と お り に 一 人 舞台 に な る の か , それ 
と も 完敗 し て し まう の か ? 
жі = РОТ м7 жх — а м 

リス ト ど お り に 入力 し , – ВОМ 


し て 数 秒 た っ た ら BREAK し , も う 
一 度 RUN で ゲー ム ・ ス ター ト . 


| 技 も 豊富 で いい で すね . 特に 技 を 掛 
けた と き の キ ャ ラク タ が いい . た だ 
| キー の 反応 が 鈍い の が 残念 


NO 


左 す み に い る 赤い 人 が あな だ で , カー ツン 
ル ・ キ ー で 左右 に 動き , [2|-|9| の キー で 
技 を 掛け ます . 技 の 種類 な よび 操作 キー は 


12 GOTO 300 
20 GOSUB 460 


30 BLINE (145,120)-(184,180),0, BF :CURS 


OR 155,121:COLOR 15:PRINT S2 


40 BLINE (60,1202-(95,180),0, BF :CURSOR 


20,171 :COLOR 15:PRINT S1 
90 SPRITE 9,(F1,124),9,3 
60 SPRITE 4,(Ғ2,124),40,5 


65 IF F2=F1+16 THEN SC=INT(RND( 1 )*9) :G 


OTO 120 


20 H1=INT(RND( 1 )*3) :IF H1=9 THEN F2=F2 


+8:GOTO 90 

89 F2=F2-8 

90 IF F1>=F2+8 THEN F2=F1+16 

100 IF Ғ2<16 THEN F2=16 

110 IF F2»239 THEN F2-239 

120 A$-INKEY$:IFA$z"'"THENP-0:GOTO150 


125 IF ASC (R$)<59 OR ASC (882252 THEN 


Pz0:GOTO 135 

130 P=URL (6$)-1:GOTO 150 

135 IF А%-СНК%(29) THEN F1-F1-8 

140 IF &A$-CHR$(28) THEN F1=F1+8 

150 IF F1«0 THEN F1=9 

160 IF F1>223 THEN F1=223 

170 IF Р=2 THEN W=W-1:IF Ы<-ӨТНЕМ 120 
180 SPRITE 0,CF1,124),PX4,9 

190 IF F2-F1*16 THEN 210 

200 SPRITE 4,(F2,124),40,5:GOTO 250 
210 SPRITE 4,(Ғ2,1242,5СЖ4%40,5 


220 SOUND 4,2,15:FOR I=@ TO 15:NEXT I: 


SOUND 9 


230 IF X1(SC,P)-2 THEN S2=S2-X2(SC,P〕) : 
SPRITE 4,(F2,124),26, 5:BLINE (145,120) 
-(184,180),0, BF :CURSOR 155,171 :COLOR 1 


5:РКІМТ S2 


240 IF X1CSC,P)-1 THEN 51-51-Х2(5С,РӘ: 
SPRITE 0,(F1,1242,36,9:BLINE (69, 129)- 
(35 189),9,BF :CURSOR 20,121:COLOR 15:P 


RINT S1 
250 FOR І-0 TO 130:NEXT I 

260 IF S1«-0 THEN 478 

270 IF S2<=9 THEN 480 

282 GOTO 50 

302 DIM Х1(9-1,9-12,Х2(9-1,9-1) 
305 GOSUB 319:GOTO 320 

310 51-150:<2-300:ЫШ-11:Ғ1-0:Ғ2-239 
315 RETURN 


(о p 研ぎ の 原理 ). 話 は 変わ っ て 。 hi 


p 7 月 号 p176 の 南湖 村 青 年 団 さ ん . 私 も あお あな だ の 意見 に 同調 し ます . 
Ст», や め だ た 方 が いい で す . 
水 を だ ら す と き 決 し て 上 貞 に 水分 が あっ て は いけ ませ ん 。 ダイ ア チ ッ プ ( サ ファ イア 2?2) が ビニ ー ル を けず り 取 っ て いき 。 
'y p.1520 ИН 4 2 ҒҒ ат Kcloudy d3 A, 私 も それ を 店 お うと し て まし た が 。 忘れ て まし た . 


ess ДЕ | 


表 の と お な り で す . な お , сирни り は 
10 回 し か で きま せん . 

画面 下 の 体力 が 先 に 0 に な っ た 方 が 負け 
c. [Y| で 再 ゲ ー ム , [NI で BASIC に 戻り 


^ 3n25A 


飛び げ り 一 発 ノ こい つ は 効く ぜ 


独壇場 BASIC リ スト 


320 FOR І-0 TO 8:FOR J=9 TO 8:RERD2:X1 
CJ; IJ)22:NEXT J:NEXT I 
325 FOR I-0 TO 8:FOR J=9 TO 8:RERD2:X2 
CJ, IJ22:NEXT J:NEXT I 
330 FOR І-0 TO 91 :READ В%:РАТТЕЕМ 581, 
B$:NEXT I 
340 SCREEN 2,2:С15:СО 0615, 1 :МАСб 3 

350 FOR І-0 TO 26:RERD B$,C$,0$,E$:LIN 
ECURLC"&H"*B$),URLC"&H" *C$))-CURLC"&H" 
*D$),URLC"&H"*E$)2,15:NEXT I 
360 CIRCLE (200,432,25,11,1,0.272,0.22: 
CIRCLE C123,42)2,36,11,1,0.87,0.11 

320 FOR І-0 TO 39:K1=INT(RND( 1 )*256) :K 
2=INT(RND( 1 )*89 ) :K3=INT(RND( 1 )ж14+2):Р 
SETCK1,;K2),K3:NEXT I 
380 FOR 1=52 TO 26 STEP 2:LINEC61,;I2-€ 
185, I2, 11:NEXT I 
390 FOR І-85 TO 101 STEP 2:LINE(9, I2-C 
70, IJ:LINECI26, 12- C255, I) :NEXTI :J7118 

400 PAINTC60,40), 10: PA INTC190, 40) :РАІМ 
TC0,1042,14:PAINT(126,104) :PAINT(91, 80 
3, 15:PAINTC152; 80) 
405 PAINT (22,89),6:PRINT(88, 104) :PAIN 
TC160, 80) :PAINT (220, 40), 10:РАІМТ СӨ, 122 
),4 
410 PRINT(9, 141),12:PRINT(96, 802,14 :PA 
INT(126, 1 22), 4 
415 SPRITE 8, (59, 19),89, 15:SPRITE 12,( 
199, 19),84,15:SPRITE16, (159, 19), 88, 15 

420 FOR І-0 TOS99 :NEXT I:HñG1 
425 SPRITE 8,(32,84 ) , 89, 1 :SPRITE 12,(1 
15,84〕),84, 1 :SPRITE16, (133, 84 ) , 88,1 

430 SPRITE 8,(932, 84 ) ,89, 1 :SPRITE 12,(1 
15,84),84, 1 :SPRITE16, (133, 84 ) , 88,1 

440 В_ІМЕС192, 189)-(255, 1 31 ) , 9, BF :CURS 
OR 195,182:COLOR 15:PRINT "by М. Наѕе" 

450 GOTO 20 
460 RESTORE880 :FORI=9TO8 :RERDF :SOUND1 ; 
Е, 15:500М02,Е+1, 15 :500М03,Е-1, 15:FORJ- 
T0208 :NEXTJ :NEXTI 


7465 SOUND1 , 659, 15 : SOUND2, 658 : SOUND3, 66 


O :FOR I =3T099 :NEXT I : SOUNDO :RE TURN 

470 SCREEN 1,1:CLS:COLOR15, 1 CURSOR 10 
;13:PRINT "SC-3000 / NF 99":GOTO 490 
480 SCREEN 1,1:CLS:COLORI5,1:CURSOR 10 
LS FRIN "Y O Uu ЫТЫ 
490 CURSOR 19,12:PRINT "Try again ? (Y 


操作 キー キャラ クタ 


立っ た まま で パン チ 


中 段 キ ッ ク 


足 を 前 後に 開い て 突き 


し ゃ が むだ け 


RUU Ч 


し ゃ が ん で パン チ 


注 : 敵 は 反対 向き に な る だ け で 後 は 同じ . 


310 行 の 変数 S1、 S2。W は それ ぞ れ むれ 自分 


の 体力 , 相手 の 体力 , 飛び げ り の で きる 回 
2-103. 上 難し か っ た だら 適 当 に 変え て み 
TI NM, 


^N) 
495 A$=INKEY$ 


、 つ 99 IF f$-"Y" THEN SCREEN2,2:GOSUB 310 


:GOTO 20 

510 IF A$="N" THEN END 
520 GOTO 495 

970 DATA 0,0,1,1,1 
.0,2,1,2,0,0,1,1, 
,1;2,2,2, 
.1;0,0,1, 
,2;2;23 
580 DAT 
,0,2,5; 
3530 
, 2,2,0, 
;3,3,3,5,5,0,3,9,0 

590 DRTR9394949394959595, 0504030404040 
407,8040408040C02808, F 8408040404040CO 
600 DRTR9394949394959595 , 0402030404040 
402,805С54844С8810Е0, 49288848482849C9 
610 DRTR9394949394959595, 0504030404040 
407, 894949892EC22E 19,F9498949494949C9 
620 DRTR9239494931C242E22, 1E04030408080 
807,8040408060505759,61469820408080C0 
630 DA^AT^001C14121412130C, 04040F 0909090 
90F , 00000080404CB444, 487040F8OFO1F11F 
640 DRTRO999999999999999 , 9191929294FF8 
OFF , 999999999325592 , 4448292949FF91FF 
650 DRTR99999 19292919292 , 929292931F 1 1 1 
91F , 9999C92929C949E9, 999948F89898E8B8 
660 DRTR3844443B214C4331 , 9 の F 93989493999 
999, 992959D9 1 OF 9C938, 2E 1 9F 8989999999 
620 DRTR99999 1 9292919292 , 929292931F 1 1 1 
91 F , 9999C92929C9ZFE 1 , 9F994CC43C98E8B8 
680 DRTR9999999999999929, 8829996F 989B9 
AGF , 9999999999999999, 999999EF 1 1D151EF 
690 DRTR9192929192931E 19, 1F02010202020 
203, C92929C929R9R9R9, R929C929292929E9 
200 DRTR913R2R2532 1 1 9892, 921E 1 1 12121E9 
203, C92929C929R9R9R9 , 2040С020202020Е0 
218 DRTR919292912E432E98, 9F929 1 9292929 
203,C02020C0206060R0, ^020C020202020E0 
220 DA^T^0190202010606E^98, 8662190402010 


2,0,0, 
1,1,1, 
1 1,0,2, 
а 0,0,5, 
3,0,0,6, 
3,3,0,0, 
3 6,4,5, 


' 103, C02020C038242444, 7820C020101010E0 


230 DRTR9999999192322D22, 120E021FF 0808 
FF8,003828bE82848C830, 2929F 090909090F ð 
240 DRTR99999999CgRE9R45, 22120E0402FF8. 


qULIA—LT—TeLb—bkIlBeus-—7t(oHUM$ALíUREEIS 
後 で LP を か ける と き ,。 iji koc ео 9 DRDD 2 2 xi LÈ T (EPonlyO ЛІЎЉЪ' Ct vA). #0, 


馬 生 不能 に な り ま す 


PiO 


QFF , 9999999999999999 , 8080404020FFO1FF 
250 DRTR999993949493929 フ 2, 0909121F 10101 
71D, 9999894949894949, 404040COF 88898F 8 
260 DRTA999E9R9B989F931C,E982F39191999 
999, 1C2222DC8bE 32C28C, F0901020C0000000 
220 DAT^000003040403FE87, F90932233C101 


71D, 9999894949894949, 404040COF 88898F 8 
280 DRTRO999999999999999 , 999999F 7888B8 
ағ?,200000000000000Е, 1 1 9E99F613D3S3F6 
299 DATR99986819132R4R9R,9B186888984B3 


000,00002020ҒЕ222222,ҒЕ20202222ҒЕ0200 

800 рАтай0070001012121Ғ9,202121Ғ001010 
002, 29FF99FC942494FC,99FC94FC94FC99FF 

810 DRTR99999991912121F9, 292329FC91929 
991 , 999999FE92FE92FE , 99FF89FE23433123 

820 DATA 9,8C,FF, 8C,9, 7E, 46, 2E , BO, 7E,F 
F , 2E , 52, 6E , 9E, 6E , 0,67, 46, 67 

830 DATA 57,67, 9E , 62, B9, 62,FF , 67,80,53, 
46,53, B0, 53, FF, 53, 3C, 4F , BA, 4F 

840 DATA зс, 32, BR, 32, 3C, 33, 3C, 4E, 47, 50 


独壇場 BASIC リ スト 


, 42,8B, 57,50, 52, 8B, SA, 50, 5A, 66 

850 DATA 5F,50,5F,66,92, 50,972, 66, 9B, 50 
; 9B, 66 , 9F , 50, 9F , 8B, AF , 50, AF , 8B 

860 DATA 32, 22, 45, 1E, B6, 31,C4, 28, B5, 31 
„BO, 1E, B1, 1E, C4, 22 

820 DATA BR,33, BR 4E, 32, 28, 3C 31, 41, 31 
:46, 1E 

880 DATA 659, 582, 494, 587, 523, 440, 494,5 
23,582 


ジョ イス ティ ッ ク 使 用 の シュ ー テ ィ ン 
グ ・ ゲ ー ム で す . 短い な が ら も , Ат 5 
クタ は 6 種類 も いま す . 

娘 ミ ニ PiO イ ン フ ォ メ ーション 


実行 する まで | リス ト どおり に 入力 し て RUN. 


ーー こん な に 短い の に , キャ ラク タ や ア 
| FE イデ ア が と て も 凝っ て いる ゲー ム で 
34 712. 


32073 


10 А1%="=/ ロロ NT や らち ちち ちく ロロ ロミ ル や ちち ちち いき ロロ / " 
15 А2%="/0 NIQ 000 > tte \ OO /" 

ZO B1$-"c/pg..V095959999»DD0  / ル や ちち らら \ ロ ロロ / " 
25 B2$-"/..pgVü0e9959259X ロロ ドル や や ちち ちゃ \ ロ ロ / " 

зо DIMH$( 32) :H$( 32) -STRING$(" ",14):ҒОК 
=OTOS: H$(1)="":NEXTI 

55 FORI=6é6TO10: H$( 1) =CHR$ ( 30) : МЕХТІ 

40 FORI-11T017:H$( I) H$(I—-1) *CHR$ (3O) SN 
EXTI 

45 ҒОКІ=18Т022:НФ (І) STRING$(" 
STRING$(CHR$(ZXO).8):NEXTI 

50 FORIZ23TO28B:H$(I)-STRING$(" 
STRING$(CHR$(30),30-I):NEXTI 
55 FORI-29T021:H£(I?)-STRING$(" 
R$CXO):NEXTI 

60 DIMC$(7):FORI-ZOTOS: READA: C$ (I) -CHR$( 
A) : МЕХТ 

65 рата 20, 24, 18,25, 19,21 

70 К16-"Ү. 。VD ち らち らち" キビ (0) *"-"-C$(2) +" Dao 
99-0$(0)4*C$(5) +СФ(1) *C$C 4A) *C$(2) 

75 k2$-"V. 。YU や ちち っ "キビ も ( 〇 ) +" 2" +C$ (2) +" 0> 
әээз/"+С%(5)+С%(1)+С%(4)+"\" 

Во Т%=С%(О)+С%(1)+С%(1)+С®%(1)+С%(2)+"= 
r" +C$( I+". ."%С6(2)-"Пәзэзәз"Я8С%6%(5)-" 

о "*C$(4) 

85 T1*$=T$+'"' tes /VVVN '': つま = 本 + "ルル らち らら ( 
ууу)" 

90 І16-"Ф/(2әэза/ \Дзэзэзз"+С$()+"+ ++ 
Пәэәз"%С%(5)%" "ЯС%6(4) *"Do222/WN" 

95 І2%-"Ә/(2әэз/ \ ル らち ちち "キリ オー +"+С$()+" 
Пәэәз"“С%6(5)%"  "-C$(4) +" 9 ( WW) " 

100 FRINT "を": ХА=20: YA=6: XB-4: YB=4: XH=13 
: YH= 1 さ : XK=Z: XT=2: XI=25: S=0: T=10000: CX=17 
s CY=19 

105 А%-А1%6:Б%-Б2%: СОЦ OR, O 

110 COLOR, 1:LINE[ 410, 122,68, 122,8, 124, 
8.1Z4,8,.178,191,178:FAINT[ 411, 123 


— 


А бай ДЫ. 
Tera 


".12) +СН 


120 CURSOR 2.0 : РКІМТ "СОКЕ о" 

130 CURSOR1B.O0 : РКІМТ"ТІМЕ 10000" 

140 CURSOR13.12:PRINT"JOYSLOJSTART! " 
150 CURSORXA, ҮА: PRINTA1$: CURSORXE . YE: FR 
ІМТЕ2% 

160 СОКбОКХЕ.12:РКІМТКІ6: CURSDRXT。 18: РК 
INTT1$ 


170 CURSORXI:17:FRINTI2$: CURSORCX . CY: FR 
INT." 

180 JOYS1 К:ІҒК<>ОТНЕМ1ІВО 

185 CURSOR13.13: РКІМТНФ (32) 

190 FA-O:FB-O:FK-O:FH-O:FF-1:FS8-21:TT-O 
:11=0 
200 

о 


205 


IF(FA=1) X(CFBzZ1) Ж(ЕН=1) *(F ド =1 ) ТНЕМ75 


IFS«OTHENS-O 
210 CURSOR 8,0: РКІМТЈБІМВ"######" : 5 
215 Т=Т-10: IFT£OTHENT-O 
220 CURSOR2Z,0: РКІМТОБІМВ"#####" s T; : IFT 

-ОТНЕМВОО 
225 FF-FF*1:FS-FS*1: IFFS= さ さ THENF5=O 


ل < < 


">" 


水中 ガン ( 十 ) を ジョ イス ティ ッ ク で 上 下 
左右 に 動か し ,〔 9 〕) の ボタ ン で 発射 し て < く 


775, だ だ し 発射 ご と に スコ ア と タダ イム 
DKS DT, 乱射 は 禁物 で す . 
英 キ ャ ラク タ は 表 の と お り 6 種 類 い ます . 
ぃ いずれ も 中 央 部 分 を 狙い 撃ち し て くだ る さい. 
ji, タコ と イカ は スミ を は き 。, 海 が きれ 
い に な る まで タダ イム ・ ロ ス が あり ます . 
Aa, イカ 以外 を すべ で て や っ つけ る と 面 


海 の シ ュー ティ ング BASIC リス ト 


230 K$-k1$:T$-T1$:I$-12$: IFFF-INT(FF/2) 
ZTHENK$-K2$:T$-T2$:1$-11*$ 

235 IFFA=1THEN2 ヨ 5 

240 XX-zINT(RND(12*6-2.5) : IFXXXOTHENA$-A 
1% 

250 ІҒКХХ>ОТНЕМАФ-А2% 

260 ҒОКІ-ОТ02: CURSORXA, ҮА+І: PRINTSTRING 
$(0" ",6)::NEXTI 

270 ХА=ХА+ХХ: XA=XA+(XA> 220) * さ ー( XS 1) X3: Y 
А=ҮА+ІМТ (КМр (1) X2-0.5) : YA=YA+ (YA-8) – (ҮА 
2) 
280 
285 
290 
2% 
500 
510 


CURSORXA;, ҮА: PRINTA$: 
IFFBH=1THEN さ さら 5 
XX=INT(RND(1)%4-1.5): IFXXXSOTHENE ま =E 


ТІЕХХ>ОТНЕМВФ-В1% 
FORI-OTO2: CURSURXB。 YE* I: PRINTSTRING 
$(" ",6)5 3 NEXT1 

220 XB-XB-XX:XB-XBE*(XB»222)32-(OXBCZ 1) X2: Y 
В-ҮВ%5бМ(ЕМр(1)-0.5)%(ҮВ>7)-(ҮВ<2) 

330 CURSORXB, YB: РКІМТЕФ: 
555 IFFKz1THENZ65 

240 FORI-OTO2: CURSORXK , 
$(" ",5)::NEXTI 

350 XK=XK+S6N(RND (1) =O. 5) +(XEK> 5) - XK 1) 
さ 60 CURSORXE,.12:PRINTKE$:; 

265 IFFH=1THEN さ 9O 

270 IFF5=OTHENXH=TINT(RND( 1 ) X4) *12: YH-IN 
T(RND( 1 ) X4) +11 


2+1: FRINTSTRING 


3BO CURSORXH;YH:FRINTH$(FS): 
590 FORI-ZOTOZ: CURSORXT.18*I:FRINTSTRING 


$(" ",5) 5: NEXTI 

400 ХТ=ХТ+ІМТ КМО < 1) X2-0.4) : XT-XT-OXT« 2 
) 

410 CURSORXT.18:FRINTT$: 

420 FORI-ZOTO4: CURSORXI.17-*I: PRINTSTEING 
$0" ".4)$:$:NEXTI 

450 XI-ZXI-*INTORND(12X2-0.6): XIZXI*(COXI^Z2 
5%) 

440 CURSORXI, 17: ЕКІМТІФ; 

450 1ЕХ1<&ХТ+5ТНЕМ7ОО 

500 JOYS1 К:ІЕК-1ОТНЕМ56О 

510 IFKZ9THENS-zS-2: GOTO60O00 

520 ХС=СХ:СХ=СХ+(‹К=4)+(К=5)+(К=6)—(К=В) 
-(К-1)-(к-2) 

S30 ҮС=СҮ:СҮ=СҮ+(К=2)+(К=)+(К=4)—(К=6) 
-(K-27)-(Kk-8) 

540 CYsCY-(CYX1) *(CY» 
СХ>29) ` I 
545 ІК(СХ<10Ж(СҮ>14) +((СҮ=15) *CCY716)0) X 
(СХ<11) + CCY2 21) ТНЕМСХ=ХС: СҮ=ҮС 

550 CURSORXC.YC:FRINT" "3; 

550 CURSORCX, СҮ: РКІМТ "+"; 

570 BUTU2OO 

600 FORI-OTO3O: T-T-1: CURSORCX , CY: PRINT" 
xa" :: SOUND2: 500Мр215-ІМТ (1/2) IX10: PRINT 
s NEXT 


21) : СХ-СХ-(СХ<О) + 


.66(" 


な か な か か わい い キ ャ ラク タ の 総 登場 


クリ ア で , 100 ポ イン ト が 加算 され ます . 


їй キャ ラク タ 
キャ ラク タ 
aya 


m 2 箇所 
中 央 2 箇所 
全身 が 見 えて いる 
と き の 中 央 2 箇所 
中 央 1 箇所 
中 央 6 箇所 
中 央 6 箇所 


| 上 下 し な が ら 動 〈 
DE 227: 


| を 右 に ゆっ くり 歩く 
| 左側 を ゆっ 〈 り 歩 く 
TOUS 


05 ІҒҒА-1ТНЕМ615 
610 IF((CX=XA+3) +(CX=XA+2) ) KCCYZYA*1) TH 
ENFORI-QGTOZ:MUSIC"G*O":SzS*10: NEXT: FA=1: 
GOTO1260 

615 IFFE-1THEN625 

620 IF((CX=XB+3) *CCX-XB*2) ) X CCYZYE-*1) TH 
ENFORI-OTO2:MUSIC"G-*O0":S-S-*10: NEXT: FBz1: 
560701310 

25 IFFH=1THEN645 

630 SF-O:IF((CXZXH*FS-12) * CXZXH*FS-14) 
)XCCYZYHO) X (Е5> 1642) +(FS< 24) ) THENSF-1 

640 IFSFz1THENFORI-OTO1:MUSIC"G*O":S$8-S8-* 
10: NEXT: ЕН= 1: Е5=22: SF-O: GUHTOUSBQO 

645 IFFK::1THEN660 

650 IF(CX=XK+2) X(CCYz13) THENMUSIC"G*O":S 
zS-10:Fkz1:GOTO1340 

660 IF(ABS(GCX-XT-2) 20) Ж ( (СҮ=19) + (СҮ=20) 
) ТНЕММОЅІСӘ"С-Е-6-0": TT=1 

665 ІЕТТ=1ТНЕМҒОКІ=0Тт05: СОКБОКХТ, 184 I:F 
RINTSTRING$(" ",5)::NEXTI: XT-2: TT-O: GOTO 
410 

670 IF((CX=X エ +1 ) +(СХ=ХІ+2) ) KV ABBCCY-19) 
< 2) THENMUSICO3"C-E-G-O":II-1 

675 IFII-1THENFORI-OTO4: CURSORXI417-4I:F 
RINTSTRING$(" ",4)::МЕХТІ:ХІ-25:11-0:60Т 
0440 

690 GOTO2O00 

700 COLOR, 0: SOUND1, 2: SOUND310: FORY-21TO 
17STEF-1: CURSOR2. Y: PRINTSTRING$(" ", 27); 
:NEXTY 

710 CURSOR11;,15:PFRINTSTRING$(" 


",18):ҒО 
RY-OTO13: CURSORO, 14-Ү: FRINTSTRING$(" "4,3 
0) 5 * NEXT 

720 FORI-OTO990: T-T-1: IFT=OTHENSUUND: GO 
товоо 

730 CURSORZ23,O0:FRINTUSING"4Htitit" 5 T: : МЕХ 


T: XTz2: XI-25: SOUND: COLOR. 1: GOTO200 

750 CURSOR6,6:FPRINT"BONUS 100 FOINTS":£ 
=9+100: FORIZOTO9: MUSIC"G-*O": NEXT 

760 CURSOR6;.06:FRINT" 4 
:6070190 

800 CURSOR6.10:FRINT"GAME OVER СОЈ STAR 
т" 

810 JOYS1 К: ІҒК< У ОТНЕМВ810 

820 RUN 

1260 ЕОКІ-ОТО2: CURSORXA, ҮА+І : PRINTSTRIN 
G$(" ", 6); : МЕХТІ: 60Т0285 

1310 FORI-OTO2: CURSORXE, ҮВ+І : PRINTSTRIN 
".6) 5  МЕХТІ: GOTOS SS 
1240 FORI-OTO2: СОКЅОКХК, 12* I: PRINTSTRIN 


確か に PB-700 は 良い けれ ど , あま り に も 遅い / (プロ グラ ム を 組む と ) これ は 1 年 前 の PC-12 系 ( ? ) と 同等 か それ 以下 で す . 私 な ん か いく 


ら や っ て も …・。 
で すか 1? 


ょ っ て 投稿 が あっ て も 採用 きれ る 確率 が 低い じ の で す ( 失 礼 ). せめ て. 
(秋葉 原 で 店 員 に つき ま と わ れ た ら 「MZ-40 あ り ま すか ? 」 と いっ て 逃げ る こと に し て いる 原宿 校 の O 君 大 好き の ぼ ぽい ん た あ ) 


も 53 年 早く 出 て いれ ば …. 


も ひと つ , p.156 の 絵 は 何 
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QFP- 1100 


BASIC 


矢 で 風 組 玉 を 割っ て いく ゲー ACCES 
22. < “аж, 
さこ PIO イン フォ メジ ーション 


= リス ト どおり に 入力 し て RUN. 


| 矢 の 動き が 面白 いで すね . ゲー ム も 
評 | 単調 じゃ な いし , よく で き て いる と 
思い ます . 


& 


19 SCREEN 2,7,7,.0:WIDTH46: CLEAR: RANDO 
MIZE: BEEPFOFF:DEFINTA-Z:GOSUB 146: GOSUB 9 
[5] 

260 K-ASC(INKEY$):CALL£H7e63:0N K-27 GO 
TOZO, 40: GOTOSO 

59 し = (.%-(1-<8) *1:GOTO 50 

46 し = し +(L 1) 一 (上 =1 ) #7 

50 Rz22324Ls: X=X+V(L):Y=Y+W(L):ON РЕЕК ( 
&H9 の 99+X+YX49) -252 GOTO 60,100, 70, 70: БОТ 
о во 

60 К-252:5лб%10:БВЕЕРОМ: GOSUB 909: BEEFO 
FF: GOTO 80 

76 Y=Y-W(L):X=X-V(L):S=S-1:GOSUB 90 

86 PRINTCSR(T。U) "#CSR(X,Y)CHR$(R);$ : 
T=X:U=Y: GOTO26 

99 LOCATE365,24:PRINTUSING"'"s4SHES": 5; : RET 
URN 

166 PRINTCSR((X-V(L) , Y-W(L) ) CHR$ (2224L) 
: FORI=©T059: ВЕЕРОМ: FORJZOTO260: NEXT: BEEFO 
FF: NEXT: ҒОКІ=1Т01500: NEXT: FORI-1TOSO6: ВЕ 
EP: NEXT: PRINTCSR(15,8) SPC (9) $CSR (15,9) " 
the end ": С5К (15, 10) ЅҒС (9) $ С5К (16, 11)" b 
est score was "; : РКІМТОиБЅІМС"### "ІН 

116 FRINTCSR(1606,12)" your score is ч 

"$sFORIZ13STO23: PRINTCSR (27,1) "1"; sNEXT 
s PRINTCSR(27。24) " ——— "s 

126 IF HS THEN H=S: FORI=9TO015090: NEXT: 
FRINTCSR(8,14)" you're the best player' 
"SPFORIzOTO7SO6: NEXT: ҒОКА= 1ТО5: ҒОКІ= 1707: 5 
CREEN 2, І: ВЕЕРОМ: BEEFOFF : FORJ-1TO100: МЕХ 
T-J4.,I, 


(28МС-777 


BASIC 


矢 は カー ン ル ・ キ ー の |+| で 右 旋回 , 
で 左旋 回 し ます . 画面 中 に 散ら ば っ て いる 
障害 物 に 当たら な いよ 5, 矢 で 風船 玉 を 割 
っ て いっ て くだ さい . 障害 物 に 当たれ ば 即 


ゲー ム ・ オ ーー バー です . 
з рор BASIC リ スト 


509 PRINTCSR(13,16)" hit any кеу! ":CA 
LL&H7OZ:WHILE INKEY$-"":WEND:GOSUB 160:6G 
OSUB 96:GOTO2e 

140 RESTORE2Z60:F0RA-224T0242: READA$ : DE 
FCHR$ (А) 2A$: NEXT 

156 RESTOREZZ26:FORA-1TOB8:READ V(A), 
) : NEXT 

160 BEEP:CLS:PRINT" pop 

179 SCREEN 2,,1:PRINTCSR (6,2) STRINGS (4 
û, "7" ) CSR (O, 22) STRINGS (40, ".) 3: SCREEN 2 
„ „ 2: PRINTCSR(ÓO, 2) STRINGS (40, "s." ) CSR (O, 23 
)STRING$ (40, "™.") 3 s SCREEN 2,,4: PRINTCSR (© 
, 2) STRING$ (40, "&") CSR (Ө, 23) STRINGS (40, "^ 
н); 

180 SCREEN 2,,1:FORA-2TO22:FRINTCSR (6, 
A) "x"; CSR (39, A) "х"; : NEXT: SCREEN. 2, , 2: FOR 
4231022: PRINTCSR (6, A) "A"; CSR (39, А) "Fi 5 : N 
EXT: SCREEN 2,,4:FORA-zT022: PRINTCSR (0, А) 
"e": CSR(9,0) "®": :NEXT 

199 ЕОКІ=1Т019: А=КМ (1) #38+1: BERND (1) ж 
20+3: SCREEN 2, , 1: РКІМТСЗЕ (А, В) "x": : SCREE 
N 2, , 2: РКІМТСЕК (А, В) "В"; : SCREEN 2, ,4: РКІ 
NTCSR (А, В) "Ф"; s NEXT 

200 FORI=9TO10: ҒОКЈ=1 ТОБ: A-RND (1) #38+1 
: BERND (1) 2042: SCREEN. 2, , Ј: PRINTCSR (А, B) 
"Os: SCREEN 2,,7-J:PRINTCSR (А, B) "e": : МЕХ 
T: NEXT: SCREEN 2,,7 

210 X=19:Y=1Z:T=X:U=Y:S=@:L=1 

220 CALL£H7OZ:WHILE INKEY$-"":L-L*-(L« 
»8) +1: PRINTCSR (X, Y) CHR$ (2224L) 3 : WEND: RET 
URN 


ыса 


カラ ー ス クエ ア ・ バ パズル 


COLOR SQUARE PUZZLE 


私 も 大 学 の 専門 課程 に 上 が っ て か ら は 製 
図 な ど で 忙 し く , あま り 複 雑 な ゲー ム が 作 
れ な く な り ま し た . その た めこ の ゲー ム の 
よう な 簡単 な ゲー ム し か 作れ ませ ん が , 
SMC の ゲー ム が 誌上 に あま り 登 場 し て い 
な い の で 発表 する こと に し まし た . 

廊 ミニ PiO イ ン フ ォ メ ーション 


実行 する まで | リス ト ど お り に 入力 し て RUN. 


一 度 に 何 枚 か 動か せ た ら … な ん て 和敬 
沢 な 願い か な ? で も 短く よく ま と ま 


к 評 


遊び 方 


完成 図 が 表示 きれ, バラ バラ に 並べ 換え 


られ た だ た コマ が 左 に 表示 され だ た だら ゲー ム ・ ス 


RRES 


ゆび る 


p 5 月 号 p166 の 水上 秀樹 きん に 一 言 . 


@ 竹本 朝 人 


- 7. 7 


NE 4 sd 5%, 黒い コマ は スペ 
ー ス で す 。 左上 上 に ある “ж” を スペ ー ス の 


ト に ドド 左右 の ひい ずれ か の コマ まで カー ジン ルキ 
ー で 移動 きせ, [RETURN | キー を 押し て 
CE の わる 
хони сва 2. 

この よう に し て カラ ー ユ コー ド の 順番 に 
(© ФО k 3 に) コマ を 並べ 換え ます . 
正しく 並べ る と コン ピュ ー タ が 自動 的 に 判 


断 し , 音楽 と メッ セー ジ が 表示 る れ ま す 。 
な お , 移動 回 数 は 右側 に 常に 表示 きれ て 
いま す 。 


P. S. 


カ み カラー コード を その まま 数 字 替 わり に 使 
っ て いま す 。 その だ め 。 アナ ログ RGB そ モ 


僕 は ポケ コン は パソ コン を も っ と 使い や すく 〈, 
よう に グラ フィ ッ ク や マシ ン 語 が 使え て も お か し く な いと 思い ます . あな だ は パソ ンコ ン と ポケ コン を 切り は な し て 考 
à? 大型 の パソ コン と ほぼ 同じ 性 能 を ポケ ッ ト サ イズ に 詰め 込む . 
ば きた だ た くみ と 読み ます . 


な お , 


2 - 30 
eco4 
240 
EEO 
250 
©0707 
260 
3020 
270 
оооо 
280 
の の の の 
290 
465С 
300 
eooo 
310 
5552 
320 
の の の の 
550 


д,-1, 


340 
さら の 
560 
570 
38e 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 
=} 


,” 


矢 の 動き が 難し い の で 大変 


最上 段 か ら そ ろ え よう と し た の で す が ? 


外 枠 に ぶつ か っ だ まま ずっ と 動か 
な いで いる と, 
ӘЛЕ いま すす 。 


スコ ア が どん どん 減っ て い 
注意 し て くだ る さい. 


182C181818183C24, EOEOFOS81EGF 
eoo00043FEFE43O0000,040COF1E3S8FO0 
243C181818183C18, 203OF0781COF 
6000C27F7FC20000, 97979F 1C78F 6 
926C418241429449, o000C02000000 
183C7EFFOFOEOGCOB,FFFFFFFFOOO0 
OF OF OF OF OF OF OF OF , SC7EFFFFFF BF 


FFOOFFOOFFOOFFOO,FFFFOOQOFFFF 


183C7EFFFF7E3C18, の 8BOCOEOF 4000 


Ө,-1,1,-1,1,0,1,1,0,1,41,1,-1 


MASATO TAKAKUWA 


ニタ を 使っ て いな い 人 は ちょ っ と 変更 が 必 
“СТ. 
ФЕ ра 

1) 瀬 々 博 裕 : “カラ ー15・ バ パズル"。 


РІО. 


T ” 
емее. 


85 年 - 6 )1 5 
2)> ° Z2 =< — v HÑ: 


"PiO パ ー ツ : 


PiO, '85 年 - 6 ) 


小型 に し だ も の だ と 思っ て いま す . だ か ら 5 パソ コン の 


これ が 本 来 の ポ ボケ コン の 次 だ と 思い ます . 


えて いる の で は な いい です 
P.S. 僕 の ペン ネー ム iz, 
(3888 Жтт») 


Nmmm'`' COLOR SQUARE PUZZLE BASIC リス ト 


19 DIM KOMA(15) 
20 WIPE:QUT 35,1 
ЗӨ CONSOLE 40, „ 25, 0: CURSOR OFF 
49 К-і 
50 FOR 1-20 TO 173 STEP 24 
FOR I-Ze TO 189 STEP 40 
BOXF (I*1,J41)-(1429,J425) ,K 
BOXE(I,J)-(1440,J426) ,7 
K-K*1:IF К=16 THEN に = の 
NEXT :NEXT 
GOSUB *SYOKI 
GOSUB *NARABEKAE 
ж ООР 
GOSUB *1IDOU 
GOSUB *CHECK 
PRINT (29,12) USING "44$ カイ メリ ョ イ 
IF KANSEI-1. THEN GOTO x*GOVER ELSE 


*SYOK I . 

FOR Ісі TO 15:KkKO0MA(I-120-I:NEXT :KD 
MA (15) =© 

X=6: Ү=6:Т=@ 

CCOLOR ё: РКІМТ 


(26,1) "SQUARE PUZZ 


CCOLOR 2:РКІМТ dur U SPO 7 7.7 


CCOLOR 1:PRINT (27,5) "VERSION 1.0 


CCOLOR 7:FRINT (26,8) "programmed 
FRINT (28,16) 
PRINT (31,12) 
FOR Ізі TO 4 
CCOLOR I 
PRINT (28+1, 16) 
МЕХТ 

FOR I=5 TO 7 
CCOLOR I 

PRINT (2441,17) CHR$ (135) 

NEXT TGCOLOR 7, SIPRINT (32,17) * " 
FOR I=6 TO 3 STEP -1 

CCOLUR: ASS 

PRINT OSS-I,IBO "o" 

NEXT 

FOR 1=2 TO 6 STEF 

CCOLOR 1,3 

PRINT (51-1,19) " 

NEXT 


"A. TAKEMOTO" 
"ө カイ メリ 


CHR$ (135) 


FRINT 
RETURN 
*NARABEKAE 

CCOLOR 6,3: BEEF 

РКІМТ (7,24) "WAIT А MOMENT! "; 
A-2195 

FOR Ісі TO 2090 

A1-IRND (3) 

ON A1 GOTO 530, 540,550 

Al=A-4: GOTO 560 

А1=А+1:1Е Аі MOD 4-6 THEN 500 ELSE 


(2821) ае p qm 


A1=A+4: GOTO 560 
A1=A-1:IF Аі MOD 4-5 THEN 500 ELSE 


IF А1<9 OR 581515 THEN 500 ELSE SWA 

P KOMA (A1) „ KOMA (A) : 4-81 

570 NEXT 

580 に =@ 

596 FOR 2-20 TO 173 STEP 26 

666 FOR І-20 TO 189 STEP 40 

619 BOXF (I*1,J*1) - CI*29,J435) „KOMA (K) 
: ド = ド ビ + 1 

620 NEXT 

630 NEXT 

646 CCOLOR „© 

656 PRINT (7,24) " 

666 RETURN 

579 «*IDOU 

686 CCOLOR 7, 2: РКІМТ 

690 Х2=Х: Y2=Y 

790 A$-INKEY$ . 

719 A$-CHR$ (%H99) 

729 A$-CHR$ (&H96) 

736 A$-CHR$(&H9C) 

746 A$-CHR$(&H97) THEN Y2sY-4 

756 АФ=СНКФ (15) THEN GOTO *CHANGE 

760 X246 OR Ү2<6 OR Х2>21 OR Y2>18 
THEN 696 

776 CCOLOR ,0:PRINT (X,Y) 

780 XsX2:Y-sY2:GOTO 680 

790 *CHANGE 

Вод A-(X-6)/5*(Y-6) 

816 IF КОМА (А) =0 THEN CCOLOR 4,0:PRINT 

(9,24) "CAN'T CHANGE '":FOR Ісі TO 3:BE 
ЕР:МЕХТ :PRINT (60,24) " "1G 
OTO 760 

820 A2-A4-1:42-0*1:04-4-4:405-40*4 


(X, Y) "+" 


THEN X2=X+5 
THEN X2-X-5 
THEN Ү2-Ү%4 


CHR$ (52) 


830 IF А2<0 OR (А2 MOD 3-2) THEN 840 E 
LSE IF КОМА (А2) =@ THEN SWAP KOMA (A2) ,KOM 
А(А):В-А2:б0Т0 886 

840 IF АЗ MOD 4-6 THEN 850 ELSE IF КОМ 
A(A3)=0 THEN SWAP KOMA (АЗ) „ KOMA (A) :В=АЗ: 
GOTO 880 

850 IF A40 THEN 850 ELSE IF KOMA (A4) = 
Ө THEN SWAP KOMA (A4) „ KOMA (A) : E=A4: GOTO 8 
ве 

866 IF А5>15 THEN 87@ ELSE IF КОМА (А5) 
-0 THEN SWAF KOMA (А5) , КОМА (A) : B-A5: GOTO 
вво 

876 CCOLOR 4,9: РКІМТ (60,24) 
NGE '":FOR I-1 TO 2:ВЕЕР:МЕХТ 
24" ": GOTO 760 

BB の к-о 

890 I=30+B MOD 4*40 

900 J= さ の +B 半 4% さ 6 | 

916 BOXF (I*1,J*1) -(I1429,J435) ‚КОМА CE) 

920 1= さ の +Q MOD 4*4@ 

930 J=30+A¥4#*36 

946 BOXF (1+1,J+1)- (1+39, J+35) , KOMA (A) 

950 BEEP 

966 Т=Т+1 

976 RETURN 

986 «CHECK 

996 KANSEI-1 

1000 FOR І-е TO 14 

1010 IF КОМА(1) <>1+1 THEN KANSEI-6 

1920 NEXT 

1036 RETURN 

1040 *GOVER 

1950 PLAY"«2T13004L8N1NSNBL 1 6N さ N5LBN1L 1 
5603NBO04N10N10903N804NZNSLBN1NSNSGL 1 6NZNSN1 
O3N1904N1NSLANB" 

1960 A$="YOU HAVE COMPLETED THIS PUZZLE 


"CAN'T CHA 
s PRINT (О, 


1070 FOR Ісі TO 3e: CCOLOR 6:FRINT (0,22 
) LEFT$(A$,I):BEEF:FOR Ј=1 TO 100: МЕХТ : 
NEXT 

1989 FRINT (8,24) "FLAY AGAIN?"1 

1090 A$-INKEYS$(G2):1F A$-"N" OR А%="п" T 
HEN WIFE:END ELSE IF A$-"Y" OR A$-"y" ТН 
EN RUN ELSE 1090 


@ 内 海 厚 

РіО "85 年 7 月 号 「 ア ンド アン 

ェ ネ シス 」 さ ん の キャ ラク タ を 
ドッ ト し だ も の で す . 


@$ て 一 くん 


7 月 号 で 清水 正章 氏 の キャ ラ 
が と て も よかっ だ の で ,。 ドッ ト 
っ て み ま し だ . いか が な も ん で 
LS E Y 
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7 月 6 日 か ら 上 野 の 国立 科学 博物 館 で , 
式 竜 イグ アノ ドン の 化石 が 公開 さる れ て いま 
す . 

イグ アノ ドン は 約 1 億 2 千 万 年 前 の 中 生 
代 白 亜紀 前 期 に 生息 し て いた だ と 思わ れる 草 
食 恐 竜 で す 。 イ グダグダ ア ノド ン と いう 名 前 は , 
その 歯 型 が イグ アナ に 似 て いた こと か ら 由 
XUL, 『 イ グ ア ナ の 歯 』 と いう 意味 だ そう 
で す . 

イグ アデ アノ ドン は 世界 で 最初 に 発見 され ただ 
式 韓 と し て も 有名 で あり , 今回 の 化石 は 
1878 年 に ベル ギー 南部 の ベル ニ サ ー ル 炭鉱 
の 地底 300m か ら ほ ば 完全 な 姿 で 大 量 に 発 
見 る され だ も の の うち の 2 ЖС. 
現在 は ベル ギー 王立 自然 科学 博物 館 所 蔵 
C, 国外 は お なろ か, 博物 館 か ら 外 に 出る の 
は 今回 が 初め て の こと で す . 

約 5m の イグ アノ ドン の 次 は , 実際 に 近 
く 〈 で 見 る と 子 想 以上 に 大 きく ,。 これ が 和 群れ 
を な し て 動い て いた だ た 6, さき ぞ や すご いな が 
өте, Эч 

と くに , 下半身 の 骨格 の 頑丈 き に は 圧倒 
әй, 本 当 に こん な 動物 が いた こと を 実感 
る せら れ ま す . 

恐竜 と いう と 。 ワニ や トカ ゲ な ど と 同じ 
は 中 類 だ と 思わ れ て いま し だ が 。 最近 で は 
恒温 動物 びと いう 説 が 一 般 的 に な っ て いま 
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仲の 良さ そう な (? ) 


+. 

恒温 動物 で 卵 性 で ある と 考え る と , 恐竜 
は 和 鳥類 に 近い 動物 で あっ だ た と 思わ れ ま す . 
骨格 も 鳥 に よく 似 て いま す . 

記章 の 絶 減 の 原因 に つい て も , いろ いろ 
な 説 が 出 て いて , 謎 と る れ て いる の で す が , 
実は 完全 に 絶 減 し た の で は な く , 進化 し て 
鳥類 に な っ て し まっ だ の で は な いか と いう 
説 も る 測 て いま す . 

ほとん ど が 謎 に 包ま れ て いて , ほとん ど 
が 想像 の 中 の 恐竜 な の で す が , 本 当 は 今 の 
人 間 で ぐら いか 。 ある い は それ 以上 に 賢く т, 
パソ コン も 触 わ っ て い だ の か も 知れ ませ ん . 

核 戦争 で も や っ て 絶 減 し た の か も 知れ な 
CL, それ と も , どこ か 別 の 星 へ 移住 し て 
し まっ だ と か ……。 

それ に も し て も 。 あれ だ け 天 き な 作 を し て 
いな が ら ,。 草 を 食べ て い だ の で すか ら , Ж 
リン や 銀 み だ た だい に 静か な , お と な し い 動 物 
だ っ だ の か も 知れ まま 科 。 

勝手 に 太古 の こと を 想像 し て みる の も 楽 
し いで すね 。 未来 を テー マ に し だ た だ 科学 万 博 
も 良い の で す が , だ ま に は 過去 を 見 て みる 
の も 良い と 思い ます 。. 

この 催し は 上 野 の 国立 科学 博物 館 で , 9 
月 16 日 まで , その 後に 10 月 8 日 か ら 11 月 24 
日 まで 名 古屋 の 市 立 名 古屋 科学 館 で 開か れ 
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な お , 主催 の 日 本 テレ ビ で は マス コッ 
ト ・ ガ ー ル に TVCE な ど で 人 気 の あ る 問 下 
この みち ゃ ん 。 アイ ドル ・ キ ャ ラク タ ・ デ 
ザイ ン に 手塚 治虫 氏 を 使っ て , イグ アノ ド 
ンジ の キャ ン ペ ー ン を や っ て いま す 。 

し か ん АУТУКУОЖҮЕНТ; f 
ラ を 思う 人 も 多い と 思い ます が 。 も と も と 
ゴジ ラ カ が 恐竜 を モデ ル に し て いる の で すか 
о, 仕方 が な いと 思い ます . Hep ORKE 
アイ ドル な の で す . 


2 体 の イグ アノ ドン . 


イグ アノ ドン の 動く 
想像 復原 模型 . 


А i 
人 マス コッ ト の キャ ラク タ と 
間 下 この みち ゃ ん 


イグ アノ ドン の 名 の 由来 


ご 人 邊 じ タ モリ … で は な くそ 
イグ アナ で すず: 


w こう や っ て 見 る と 恐竜 の 
巨大 さがわ か り ま す . 


2 Ріо" 


古典 的 な パズル も , マイ コン で や 
れ ば 一 味 変わ っ た も の に な り ま す . 
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СЉ 2 MASSz, 相手 より 多 
く 自 分 の 家 に 引き 込ん だ 方 が 勝ち と 
いう 2 人 用 の ゲー ム で す . Cb, в 
こ 1 人 で て 遊び た い / と いう 人 の た め 
に 。 1 人 人 で も 楽し な こと が で きる よ 
うに も な っ て いま す . 

MASS を どう や っ て 自分 の 家 に 
引き 込む か ? ちょ っ と 頭 を 使う ゲ 
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前 回 の “スター トリ ッ プ " CON 
基地 の 発見 セ な よび タイ ム ボ ポケット 
の 謎 を 解明 し た 功 に より , SILET 
ライ ク は 大 佐 に 昇進 し た . 

そし て , 今回 私 は また 新しい 任務 
に つく さと に な っ た 。 ЖӘНЕН: 
連邦 の 誇る 重 戦闘 機 " ス ー パ ー ド ラ 
VA" の 実戦 試験 で ある . 


ge БТ сүэ] Бун C^ 
ル ・ ゲ ダー ム を 作っ て み ま T 


198х +, 某国 某 生物 研究 所 で 極 
秘 の うち に , 遺伝 子 操作 に よる 研究 
が 行なわ れ て いた . と ころ が オペ レ 
ー ト ・ ミ ス に よる 事故 の た め に , WE 
一 の サン プル 細胞 が 細胞 組織 に 分 解 
し て し まい , 勝手 に 動き だ し て し ま 


AT 


すべ て の 組織 を 回 収 し て ほし い . 


а Р A Z kiss a C 


Сы 


(Ы スー パー バズ ー カ 


バズ ー カ 砲 を 使い , 敵 の タン ク や 
ジー プ を ぷっ と ば すず 気分 壮快 な ゲー 弾 に 
AY. và; 


込め て , 


日 ご どろ の スト レス を バズ ー カ 砲 の 
一 気 に 解消 し て くだ き さ 


不思議 株 の 近く に ある ボブ 君 の う 
Ps PF KEV SET ‘PFA ЄЛ? ズ ズ バス < “PF な ст, АДАЛ. 

blk, 森 の 動物 た ちの 世話 を し て い “БЕЗ д?н RZA” ‘PFA 87 == 
た gta- sese ҒЫР ES TIE "9f. 9. 

5 t*ozfti $715429*. ЖУ) қуу. 

し か し , 今年 の 冬 は と て も 長く 〈, 279%. 120° 49°. а 

саты 3, ++ “Уи $*2/93* k9* 9. 92. 443.2 
吹雪 が 続い た た め , この まま で は 動 k 40309* NSR VEI. 
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物 た ち が 寒 さき で 死ん で し まう …. 
テキ スト ・ タ イプ の アド ベン チャ 
ー ゲ ー ム で す . 果たし て ボブ 君 は 森 
の 動物 た ち を 助け て あげ られ る で し 
ょ うか ? 


トワ アラ ラ i жайт” “22,73. 
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念願 の 地球 連邦 冥王 星 地区 士官 学 
校 の 卒業 試験 を パス し た 俺 は , 冥王 
星 第 3 区 戦線 に 配属 され た . 

あこ が れ の 地球 戦線 に 行く に は 


各 戦 線 で 30% 以 上 の 撃墜 率 を あげ , 


сою 2500 JET 4 
ҮН vri 9% Ë Жу ? 


е hes 4 


жие чинин EI 
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sonet mE 
ム 化 され まし た 。 tO ure 
け / PiO」. 

ある 日 , お 腹 を すか し た PiO 君 が 
ふと 下 を 流れ る 川 を 見 る と な ん と 
フル ー ツ が 流れ て いた の で す . D 
だ だ な 趣き っ る そ で いか だ よう お も 
прю. し か し , 世の中 は そん 
な に あま く は な か っ た だ た の で す ., 


森 の 中 で 道 に 迷っ た キャ シー ちゃ 
A. RONEN TREANA 
な どの モン スタ ー に 出会っ て , も う 
ビッ クリ サ 。 "キャー と 黄色 い 声 を 
あげ て ば か り . 

ボー ナス ( ? ) の フル ー ツ は 43 種 類 
も あり , キャ シー ちゃ ん の 味方 に 
っ た り 敵 に な っ た だ たり と , アイ デア 滴 
載 の ゲー ム です. 


J PC-6800 シ リー スズ 


MZ-1200-80K /C 


1 つ ず つつ 内 側 の 惑星 戦線 へ 行く し か 
で MY の 7 だ し 。 


PUE, へ き 地 戦線 が 待っ て い 


АН: Кт, = EBV 
リバ ー ス ・ カ ー を 操作 し , 間 を 飛び 
か っ UFO や BUG た ち を 人 退治 し て さく 
だ さい , 

で хто Вее Д 
で 都市 を 壊し て し まう こと も あり ま 
Tu. 


арте Yonne асс T Mies к эчу ens] 
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人 間 が 所 か まわ ず 捨 て た ブ ミ の 中 
25, ネズ ミ や ハエ の 化け 物 が 現 わ 
7142; 


そこ て で 君 は 清掃 用 ロボ ッ ト を 使っ 
ミミ を 拾い な が ら 化 け 物 を 退治 
あこ と に に し た か 7 
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レー ル に 
0, ME 
teni meg. 
面 を クリ ア 


沿っ て 移動 する 砲台 
O57 Mom ン 


チャ コ は ある 夜 , 見 知ら ぬ 老 釘 に 
起こ され だ . 
PV rS ee cm. > 7 BOOBY 
TRAPPERS を 退治 し て ほし い . 

こ 析 を 使っ て ぐれ 」 と , SENE 


する ボー ル を 渡し た ・ 


PC-8000 レ シレ シリーズ で お な じみ の ナチ 
ャ コ ニ ャ ン が 。 つい に FM に 登場 し 
まし た. 作者 自身 が 移植 し た 意欲 作 
et. 


010001 


ыган 


が 変化 する た め 。 レール の 上 を 動く 
砲台 が ワー プ し た すり , 空中 (? ) を - 
回 転 し た り し て , な か な か 愉快 な ケ 


ー ム です . 


Maca 


地下 に 
路 の よう に 
о СЉ, 


ЖО Б ОЛЕН 12 


建ち 並ぶ 超 高 層 ビ ル , 


そし 
т. つか な い , Ж 
り 組ん だ 水道 管 が 


どこ か ら 現 われ た の か 無 
住み 付い た の 
都市 は 大 混乱 に 陥 


ある H, 


水 は 止ま り , 


チェ 
EFI 


an 


「 ボ ポル ター ガイ スト 」 「 悪 魔 の いけ に 
え ,」 の トビ ー・ フ ー バ ー 監督 の 最新 スペ ー 
А э, ' ス ペー スバ ン バ パイ ア 」 が か が ニ 
の 夏 公 開 さ れ ま す . 

接近 する ハン レー 彗星 探査 の た め に 地球 を 
旅立っ た 宇宙 船 チ ャ ー チ ル 号 は , 宇宙 空間 
を 漂っ て いる 巨大 な 謎 の 宇宙 船 に 遭遇 し ま 
し た . 

調査 の た め に その 宇宙 船 に 乗り 込ん だ 4 
ADRIEN 523, そこ で 見 た も の は ひか 
ら び だ エイ リア ン た だ ちの 死体 と , НЕЙ» 
られ た 人 間 の 形 を し た 3 体 の エイ リア ン で 
LA. 

し か し , チャーチル 号 は 、 そ の 3 体 の エ 


イリ アン を 地球 に 持ち 帰ろ うと し た 帰途 て, 


消息 を 断っ て し まい ます . 

を し て , 救助 隊 の 前 に 姿 を 現 わ し だ も の 
は , チャ ー チ ッ ん 号 の 中 の 飛行 士 た ちの 死体 
|, ФОЛЕПЕСЛАТТУТГІЛТ 

その エイ リア ン な たち は, 実は 生命 の エネ 
ルギー を 吸い と り , その 餌食 と な っ た だ た 人間 
を も 人 怪物 と し て よろ みろ が えた る と し いし うう, 
ュ パ ンー パイ アナ だ っ た の て す . 

し か し 、 ま だ その 正体 に 気づか な い 救 助 
В, その エイ リア ン だ た ち を ロン ドン の 宇 
宙 科 学研 究 所 に 届け る の で す . 

そし て , 科学 者 た ち が そ の 正体 に 気づい 


スペ ー 


カー 族 が 平和 に 
ZED, モン スタ ー が 侵 
チェ ッ カ ーー 族 も 総力 を 
あげ て パワ ー ス ー ツ の 研 完 を も た 導 。 
試作 品 が 完成 し た と き に 
ェ ッ ク 星 の ほとん ど が 制圧 され て い 


AL きだ 。 


МІС-100 
BEI 2:72 < ZARE 
2 危険 な 倉庫 の 中 で , 


す あ な た . 


な の です. 


REA 


爆弾 や 


Xv 


暮らし 


は すでに チ 


Danger Zone 


っ て いる とい 
危険 物 回 収 作 
業 と いう 危険 な アル バイ ト に 精 を 出 
し か も 邪魔 な 
が 倉庫 の 中 を うろ つい て いる か ら タ 


を 押せ , 壊せ 


EAF 


と っ て も 気弱 な PiO く ん が , ある 
日 散歩 に 出かけ まし た だ た. と ころ が , 
道 に 迷っ て し まっ た の で す . 

そし て Pi0O 〈 く ん は , ある 古い お 城 
の 前 に 来 た の で し た . 夜 も も う 遅 い 
し , 今晩 は この お 城 に 泊まろ うと 決 
SVS PIOS A ТЕЕ. 
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ペー スハ 


тіз, 時 すでに 遅く 。 よみ が えっ だ た だ エ ィ 


U 7 мы ез x P жй гуы з= 72 (C 3 
と し いれ えす. 

は た し て , 彼ら 6 を 退治 する 手段 は …… . 
ШЖ! т {7 О.Д, 7 X 


と 「 狼 よる 5 ば 」 の ドド ーー ヒー 
ロタ ダ クション ・ デ ザイ ン は 「2001 年 宇宙 の 
К оган ダグ ダレ イス マン € C, 


イア 


日 本 ヘラ ルド 映画 配給 


SEX は ! ス ター ウラ ウォー スズ 」「 ス ター トレ ッ 
ク 」 の ジョ ン タイ クス トラ が 担当 し で いい 
31. 

ЖЕН, АЯУ 


トマ ン 」 の スチ ティー 
ブ ・ レ イル ズバ パック, 「 テ ス 」 の ピー ター・ 
27-7. EL CAG 2 TOR кА. 
この 映画 は 8 月 に 日 本 ヘラ ルド 映画 の 配 
給 で , 全国 ロー ド シ ョ ー 公 開き され ま す . 


35 


maibui 


ラジ コン で 動く , お 茶の間 の ロボ ッ ト と し て 好評 な , トミ ー の オ 
ム ニ ボ ッ ト に, 新 機種 が この 秋 デ ビュ ー す る こと に な り ま し た . 
各 機 種 と も 多芸 多才 な オム ニ ボ ッ ト 5 種類 を 紹介 し ます . 


Ss オム ニ ボ ッ ト OOM 
C$. 私 だ けが 賢 
(C, 人 間 の 言葉 


сәттер 


な な 床 し て で る で し 
JA ょ 。 オ ォ オマケ に ガセ ヤセ 


РБ О, 


が わか る ん で す よ 。 


リー アツ ノ フ し だ オム ニニ ポット 


トミ ー か ら "84 年 3 月 に 発売 され た 
従来 の オム ニ ボ ッ ト は , ラジ オォ ・ コ 


ント ロー ル 機 能 . テー プ 機 能 。 プロ グ 


ラム 機能 な ど を 備え , ラジ ュ ン で 動く 
ラジ カセ し し て も し 合え, な も ちゃ し た し 
て ば かり て は な くく, 大 人 に も 人 気 が カ 
り ま よし た 。 

今回 発表 る れ た だ 5 機種 の オム ニ ボ ッ 
ト は , 機能 面 の 充実 を 計り , 様々 な 用 
途 に 使え る よう に , それ ぞ れ が 別 の 個 
性 を 持っ て いま す . 

同時 に オム ニ ボ ッ ト ・ シ リー ズ 共 通 
の オプ ショ ン も 多数 発表 きれ, in, 
従来 の オム ニ ボ ッ ト で は オプション で 
あっ た , アプ リケーション 用 の パッ 
ク ・ っ パネ ル も 装備 され , 応用 範囲 が き 
6 に 拡がり まし だ た. 


オム ニ ボ ッ ト CD ム ー ビ ン グ キ ャ ピン 


実用 性 を 軍 視 し , 動く オー ディ オ ・ 
ウッ タダ と し て 才 を られ た の が この オ 
ム ニ ボ ッ ト CD キ ャ ビン で す . 

話題 の 小型 CD プレイ ヤー を 本 体内 
に スッ ポリ 収納 て きす 。 NNI 2 V — > 
ー も 搭載 で きま す . 

£L, ШЕП». AFLA 
が も だ し も も あり, CD だ が だけ で は 
гі, カタ カセット, チープ も 義 有 8」 5 
に だ な だ り ま す 、 

これ だ け の 物 を 搭載 する と , か な り 5 
の 重量 に な る の で す が , 軽々 と 動い て 
ІЗОӘНЖЕІКТТ, お まけ に , 
音 に 反応 し て 目 ガ ピン クタ 色 で 点 注 し て 
ntt. 


ウー イ . 酔 っ ぱら っ ちゃ 
っ て , 目 ば か りか 腕 ま で 
まっ 赤 に な っ ちゃ っ た . 
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ped dt E. F. Ps Р. 


全 私 が 一 番 素直 で 性 格 の 良い , 
オム ニ ボ ッ ト MKII で す . 


| PT 
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= ] 


オム ご ポッ トワ ブフ 


実用 本 位 で 。 ム ダ を まっ だ 《 省 いた 


Өз", ҒАР л C. 


荷物 運び 専用 の ロボ ッ ト で す . 

ー ス タイ ル は 上 側が の っ ぺら ぼう で 
いか に も 「『 荷 物 専用 』 と いう 感じ で す 
»', ガ は 見 か けど と どおり に 強く , 25kg ま 
で の 負荷 を か け て も ラク に 動き まわ り 
37. B 
飲み 物 な ど を 運ぶ が ワゴン と し て や , 
小 き 3 な 子供 が 乗っ て ロボ ッ ト ・ カ ー と 
し て 合う こと ょ も で て でき ます, 

ライ ン ・ ト レー サー が 内 蔵 き れ て い 
BOT, 床 に 書い た 線 を た どっ て , H 
的 の ころ まで 行く て こし も で きす ます. 

オム ニ ボ ッ ト MKII 

従来 の オム ニ ボ ッ ト が 持つ 機能 に 加 
ЛТ, 背中 に 各種 アプ リケーション の 
使え を る セン サー バ パネル を 標準 装備 し た だ 
ОЖ, 44-8» HMKIICT. 
オムニ ボッ ト 同 様 , デジ タル 時 計 , 
аи һатта исх и 
L, カラ オケ ,。 アラーム な どの 機能 が 
あり ます 。 

標準 装備 の 光 セ モ センサー を 使え ば , Ж 
に 反応 し て カモ セ モット の コン トロ ー ル も 
сват. 


合 TV カ メラ て 撮っ た 兄弟 た ちの 写真 で す . 2 
人 と も な か な か アガ ッ て いる みた いで すね . 
ペペ オプ ショ ン の TV カメ ラ を 付け れ ば , リ モー 
ト ・ コ ント ロー ル の TV カメ ラ に な り ま す . 


る 背中 に 付け られ た セン サー 
バ パネル. 
オプション の 光 セ ン サ ー で 
+. 店 番 だ っ て で きま す . 


+ م‎ る スー パー ソニ ッ ク (f 
オム ニ ボ ッ ト OOM 音波 ) セン サー. BER 
を 探り ます . 

音声 認識 機能 を 備え た 
オォ オムニ ボッ ト が OOM で 
Т. 

НІЛЕ, 後退 , f~, Ж 
Ғ, Hini, Æi 
CRT STOTT, леу 
ト の 制御 な どの 10 種 類 の 
動作 を 声 で コン トロ ー ル 
"tat, 

に ニー まし St, 25 
て ジャ ヤサイ プッ ァ ト ロボ て すね (か な か なり 
古かっ だ か な ?). 


ボディ ー と 調和 する 超 
音波 セン サー の バッ ク バ パ 
ネル で す . 


オム ニ ボ ッ ト 2000 art 
身長 65cm と , 一 番 大 き な オ ム ニ ボ ッ 線 を た どっ 
て 目的 地 へ . 


PTT. WCR rar hannt 
の も 。 こ の オム ニテ ニ ボ ポッ ト だ け で す 、 
腕 は 3 個 の モー タ を 使っ て , 肩 の 上 
T. ио к, 手 の 開 閉 が で き , $ 
用 の 電動 トレ イ を 付け れ ば , 飲み 物 を 
ロップ に 注 で か な ん て こと も で きす ます . 
お 有 # 敵 を 運ん て カラ オケ も て きる お 
父 き A に 上 と て も 事 ば は れ そ うな スー や ー 
ロボ ポ ボット て で て す . 


Omnibot SERIES 


予価 \45 .000( 光 セン サー 付 ) 
予価 \78.000( 光 セン サー 付 ) 


オム ニ ボ ポッ ト MKII 


ЖА жу ROOM 


us U チャ ン ネ ル 2 と 2 タイ プ あ り ま す . 
現行 の オム ニ ボ ッ ト に , セン サー バネ ル を 標準 装備 . 
各種 アプ リケーション が その まま 使用 で きま す . 


音声 認識 機能 を 持ち , 音声 に よる 動作 指令 が 可能 で す . 


u 2 x ar 両 腕 や 首 な ども , ラ ジオ ・ コ ント ロー ル で 作動 で きま す . 
ーー ここ ここ x オム ニ ボ ッ ト の 台座 部 分 だ け を 生か し た , ワ ゴン ・ タ イプ の 
ーー ーー | | アプ リケーション の 接続 に より , 実用 性 大 . 
オム ニ ボ ポンッ ト CD ーー |» | CD プレ ー ヤ ー, ウォ ー キ ング ・ タ イプ の カセ ッ ト ・ レ コー 
ムー ビー クキ ャ ピン | _ 予価 \29、800 ダ と スピ ー カ な ど を 接続 すれ ば 動く (ロボット ・ オ ー デ ィ オ 
(仮称 ) nos ラッ ク 、 。 


チャ ン ネ ル 1, | セン サー バネ ル ( オ プシ ョ ン ) を 組み | 。=。 
込む こと で て, 各種 セン サー 使用 可 . 
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PAR2wA4 


AMTHACK 


あな た の 経営 者 と し て この 腕前 は 7 


アメ リカ は 大 西部 を 舞台 に 繰り 広げ られ 
5, 鉄道 会 社 の 経営 シミ ュ レ ーション ・ ゲ 
ー ム で す 。 マル チ ・ ウ イン ドウ 方 式 ( い く 
つも の 画面 を 同時 に 表示 する 方 法 ) を 採用 
し て いる だ め , 操作 が 簡単 で ゲー ム の 進行 
も 実に スピ ー デ ィ で す 、 

鉄道 会 社 上 いう の は , 初期 コス ト が 非常 
に か か b ます . 土地 の 買収 , 鉄道 の 敷設 , 
列車 な どの 資材 や 人 材 の 調達 。 etc. その 
だ め , と どれ だ け 初 期 コ スト を 下げ , どれ だ 
け 早 〈 利益 を 得る か が ポイ ント に な る で し 
£33 

ま だ, 鉄道 の 経営 で は 利用 客 の 確保 も し 
な けれ ば な り ま せん . その だ め に は 村 の 開 
発 を し な けれ ば な ら 6 な い お け で す が , ここ 
で も あな だ の 手腕 が 必要 と な り ま す . 
娯楽 施設 や 商店 の 建設 , 経営 . 村 の 治安 
維持 . 村人 が 不満 を 訴え れ ば , 社長 自身 が 


リン グ クエ スト 


RING QUEST 


妖術 師 リ サ が 微笑 む の は いつ 7 
PiO'84 年 9 月 号 で 紹介 し た , " ザ ・ リ ク 
>x F” の 続編 で びす. この 作品 で は , 新た 
に ロー ルプ "レイ ング 的 要素 が 大 幅 に 組み 込 
され まし ただ. 
前 作 と 同様 。 バ レ マ 王 国 第 一 の 勇者 ,。 ご 
ー ン を 伴っ て 畳 険 に で か け ま す . 前 作 に も 


( M NE NM SE ) 


CGORN) 
x 


や イメ イリ ョ ク 
(PLAYER) 
5 


R’ ノウ 
29” 
セイ メイ リョ ク 
RAD 
サ ヘ マ リー ン 200 
NH 
2*-» (97 79100 ソレ トモ IAN PCF OR FD. 
>g 


相手 は た っ た 1 人. ゴーン と いっ し ょ に 開 お う ! 


ルー サイ ト 


LooSight 


ワー プ ・ ゾ ー ン で トリ ッ ク を 解け ! 

主人 公 の RICK は, 惑星 LooSight に 不 時 
着 し た まま 行 方 不明 に な っ て いる , 小型 宇 
軍船 PLUDE の 救出 に 向かい まし た. 

PLUDE を 見 付け る に は , 手がかり と な 
る KEY を すべ で て 集め る と PLUDE が 出現 し , 
面 ク リア に な り ま す . 

し か し この 星 に は 凶 竣 な 動物 と 原 住民 が 
vct, 奴ら に 捕まる と と RICK が 死ん で 
し まい ます . 奴ら に 対抗 で きる 唯一 の 武器 
は , 奴ら を 一 時 的 に 気絶 る せる こと が で き 
2, SPEX と 呼ば れる コン トロ ー ル 可能 な 
ミサ イル で す . SPEX は , APEX E54 
る くる 回 っ て いる 水色 の エネ ルギー 源 を 取 
る と 使う こと が で きま す が , 数 に 限り が あ 
る の で 注意 し て 使わ な けれ ば な り ま せん . 

まだ , この ゲー ム の ポイ ント で ある , ¥ 
ラキ ラ と 光っ て いる ピラ ミッ ド 型 の ワー 
デ ・ ジ デー ン が あり ます .。 この ピラ ミッ ド 型 
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STT 

PC-9801/E/F/M/U2, 
FM-7/NEW7/77, etc 
カセ ッ ト \4.800 ディ スク Ұ5,800 
シミ ュ レ ーション 
その 村 ま で 顔 見 せ し な けれ ば な ら な い . し 
か も 近く の 戦い 好き の イン ディ アン が 襲撃 

(550, 疫病 は 流行 する …. 

以上 の よう に , あま り に も コス ト が か か 
る だ め , 50 万 ドル 程度 の 資金 で び では と て も 足 
り そ う に な い -… と ば か り に 銀行 か ら 借 り る 
と , 今度 は 借金 返済 に 首 が まわ ら な く な っ 


ウ ワ ー, 賃上げ 要求 を し て きた . これ は きつ い . 


Star Craft 

PC-8801/mkII/SR, PC-9801/E/F/M 

FM-7/NEW7/77 

ディ スク ( 5 イン チ , 3 .5 イ ンチ ) Y12,800 

アド ベン チャ ー 

ちら っ と 登場 し だ , 妖術 師 リ サ が 今回 の お 
相手 . 

前 作 で は , ドラ ゴン を 倒す こと より も レレ 
ディ ー タ ダイアナ の 領地 を 救う こと が 目的 で 
し だ. 今回 も この 例 に も れず ,。 すべ て を 破 
壊し よう と する “RDF” 12А 5 


€ SE SH ) 
72%” 292 +904 
デ ノ 71 


' 120° mn 
47054 $° ョ ウソ ウ テ * 
b*av»9 MIS. 


スイ トウ ・』 ま ズ * 
サ ヘ マ リー ン 288 


ふ ぶ ぇ リサ さま が お 起り な すっ た だ よー-. 


COMPAC 

PC-9801/E/F/M/U2 

ディ スク ( 5 イン チ 2DD) Ұ5,800 

(3.5 イ ンチ 2DD, 5 インチ 2HD) Ұ6,800 

リア クシ ョ ン 

の 物体 WARP に 触る L, 反対 側 に ワー 

する の で す が 。 ワー ププ 先 に ワー の 対象 と 

な る 物 が ある と , さら に その 先 ヘ ワー し 
27. 

この ワー は な か な か 上 難しい の で す が , 

これ に 慣れ れ ば , A b RUF BHR U dZ 

5L, ЖЕУ k SK. ゲー とら PU を 


英 を 利用 し て , 璧 の 向こう まで 一 気 に ワ ー プ . 


CUSI T. 

ライ バル 会 社 は 10 社 は ど . それ ぞ れ に 特 
徴 が あり , 他社 の 邪魔 が だけ を する 会 社 , 純 
粋 に 利益 を 得 よ うと する 会 社 な ど な ど , 十 
社 十 色 (? ) の 行動 を し ます . 

この ゲー ム を や っ て いる と, 社長 の 仕事 
も 楽 じ や な いな が … と いう の が よく わか り ま 
FR, 
(問い 合わ せ 先 》 スク エア 
223 神奈 川 県 横浜 市 港北 区 日 吉本 町 
1776-3F 
(044) 63-6201 


どこ と な くわ び し さ が 漂う エン ディ ング . 


て いる リサ を 救う の が 目的 で す 。 
ょ と こみ が 。 この リサ と いう の が イズ タラ 
好き で て で ( 混 涯 の 指輪 が そう きる せる の だ , と 


" 之 ニ ュ ア ル は 言う の で す が ) , メ マッ と 現 わ 


れ て は せっ か く 増 や し た 能力 を 減ら し た り , 
まっ た だ く 別 な 所 へ 飛ば し て し まう の で す . 
55, 憎 っ だ らし いっ だ ら あ りや し な い / ノ 
らし か も し まき に は な うま 所 っ と を 飛ば し て 
くれ ます . 能力 を 減ら きれ だ た だ たら ナ キ を 見 る 
こと に な り ま すず の そこ は を それ, あな だ の 
体力 。 知力 が も の を 言う の で す ( と 思い ま 
443, 
gis, ҒА Zb X5vo-ciütso€12, 
800 と ちょ っ と 高め の よう で す が (2D の デ 
ィ ス ク 版 は ЗН И), ゲー ム を し て みる 
と わか る と お り , 決し て 高い 買い 物 で は あ 
り ま せん . 本 格 派 マニ ア を 自負 し て いる 人 
E3443: UIT. 
《 問 い 合わ せ 先 〉 (株 ) ス ター・ ク ラフ ト 
171 東京 都 豊島 区 雑司 が 谷 3-22-3 
Z (03)988-2988 


うま く 〈 く 利用 し な けれ ば , 永遠 に KEY を 取 
れ な い 面 も ある の で ,。 ワー プ の 性 質 を よく 
研究 する 必要 が あり ます . 

な お , 上 難しく て 先 に 進め な い 方 の だ た め に , 
TeleSter と GIS( ゲ ー ム 情報 サー ビス ) で て と 
ント 情報 と 秘密 コマ ンド を 公開 し て いま す . 
(問い 合わ せ 先 》 (株) コム パッ ク 
8151 東京 都 渋谷 区 代々 木 1-37-1 

ぜん らく ビル 5F 
1% (03) 375-3401 


| 208 ERER 
早く しない と, カキ が 移動 し て し まう ぞ . 


バリ シン の ビ S つ ドー ル 
が 日 本 に こ 上 陸 ! 


コン スト ラク ショ ン ・ ゲ ー ム の お お手本 と 
いう さき О у 5:22; 3 
ン ・ セ ッ ト が 日 本 で も 手軽 に 楽し め る よう 
И 1702: 

普通 コン スト ラク ショ ン 機 能 ほ と いっ て も, 
ゲー ム の お まけ と いう 感じ が 強く , 中 途 半 
端 だ っ だ り ,。 使い に く か っ だ りす る も の が 
多い の で すす が, この ゲー ム は , コン スト ラ 


Banusx 1 


作っ て いる 途中 に , 試し 打ち も で きま す . 


ワー ルド ゴ 
コル フ 
エキ スト ラ ・ ホ ー ル に 挑戦 

ワー ルド ゴル フフ は,。 ゴル フ 場 の 臨場 感 と , 
К-ТҒХУКИШОШЕКСЖИЗ д-р; 
Ты, ゴル プ っ Xd. 

ゲー ム は , トー ナメ ント ・ モ ー ド と トレ 
ー ニ ング ・ モ ー ド の 2 種類 が あり ます . ト 
ー ナ メン ト ・ モ ー ド で は 。 実際 に 306 大 た の デ プ 
ロ と トー ナメ ント 形式 プン イア S. 208: 
ー ル 終わ っ だ 時 点 で で スト 10 以 内 に 入れ ば 
その 順位 に 応じ て エキ スト ラ ・ ホ ー ル ( 9 
ホー ル ) の 使用 が 認め られ ます . し か し 上 
位 に 入る の は 相当 の テク ニッ ク を 要する の 
t, 初め は トレ ー ニ ング ・ モ ー ド で 充分 に 
練習 を 積ん で な お く こ と を お ぢ お 勧め し ます . 

る て プレ イ を 始め る と , 画面 に は コー ス 
の 全体 図 . プレ イヤ ー, スコ ア な どの 情報 
の 3 つが 表示 る れ ま す . ルー ル は 本 物 の ご 
ルフ と ほぼ 同じ で , 地形 , 風向 や 風速 ( 毎 
回 変化 する ) な ど を 考え て クラ (ウッ ド , 
ТАУ И, ӘУ) ラガ 一 な ど 14 本 ) を 


立体 版 遊撃 王 


本 格 的 な ドッ グ ・ フ ァ イ ト が で きる ! 
Colum FZE Da 7X 
体 を リ り リアルタイム で 動か す フ ライ ト ・ シ 
ミュ レー ショ ン ・ ゲ ー ム で す . 

ファ イ テ ィ ング ・ モ ー ド で は 敵 機 も 現 わ 
れ , 実戦 き 8 ながら の ドッ グ ・ フ ァ イ ト を 味 
わ う こと が て さき ます 。 

ステ レオ 画像 技法 を 使っ て いる の で , ft 
属 の 立体 メガ ネ を か けれ ば 立体 画面 で フラ 
イト も 可能 で す . 

体 で 楽し ゆる 地形 の デー タ Ы, 世界 と 


敵 戦闘 機 を 捕え た ! ミサ イル 発射 . 


ビー ルコ ッ ス トラ 2 ツ ョ ン セ 小 _ 


COMPTIQ 
PC-8801/mkII /SR, PC-6601 
ディ スク ( 5 インチ , 3.5 イ ンチ ) Ұ6,800 


РС-9801/Е/Ғ ディ スク ( 5 イン チ ) Y7,200 
リア クジ ショ ン 
クシ ョ ン 機 能 を その も の が 。 ゲー ム の よう に 


楽し みな が ら 遊 べ る の で す . 
操作 は 簡単 で テン ・ キ ー を 使っ て アイ 
ュ ン を 動か し , 画面 右 に ある 各 パ ー ツ を 艦 


面 に 配置 す BI IT. ビン ボー ノル ・ ケ ゲー ム 
が で き あ が り ま す . 
BUE, プリ ツラ フ パ ーー。 эў әле TA 


ィ イーター (ボー ル 


ピナ ー を 初め , ボー ル ・ 


得点 の 設定 は , プラ イヤ ー と ドラ イ バ ー を 使っ て . 


ENIX 

PC-8801/mkII /SR 

カセ ッ ト \4,800/ デ ィ ス ク Ұ5,800 
リア クシ ョ ン 


選び , 打つ 方 向 や 強 る ,。 さら に フッ ク グ , Ж 
ライ ス を ディ スプ レイ を 見 な が ら 6 入力 し ま 
+. 後 は | SPACE | キー を タイ ミン グ よ く 
押し て ショ ッ ト し (タイ ミン グ で ボー ル の 
Sb ЖТ Z AEA, トッ デス ピン シン が 決ま 
る )、。 ゲ ダーム を 進め ます . 

グリ ー ン の そば ま て 来る と 画面 が 拡大 き 
а, 画面 の 上 方 に 芝生 が 表示 る れ ま す . š 


М‏ حر 
+ + 
oo‏ 


пап 


川越 え の 6 番 ホー ル . コー ス の 立木 に 気 を つけ て . 


SYSTEM SOFT 
PC-9801/E/F/M/U2 
ディ スク Ұ7,800 

シミ ュ レ ーション 


日 本 の 主 な 都市 が 40 筒 所 も あり , 実際 の 地 
形 に そっ くり に な っ て いま す 。 


機体 に 関し て 約 20 の パラ メー タ を 計算 し | 


ГТысуы 5а - ТАУ” ж-е 
ДЕС А AKRE CD 
高い 水準 を 保っ て いま す . 

それ だ け 飛 行 も 難し く , 慣れ な いと 行き 
た い 方 向 に も 行け ませ ん が 。, 飛行 技術 の 上 
達 に 応じ て , どん どん 面白 味 が 増し て きま 
Ў: 


立体 モー ド . 彼方 に 見 える の は 新宿 副 都心 . 


を 食べ る /) や マグ ネッ ト ( ボ ー ル を 一 上 時 つ 
か む ) な ど 面 白 じ も の が そろ っ て いま す . 
また だ た だこ TODD {Жүз (оТ Ь (7 ) ЖА 
に 配置 で きる の で , 本 物 び で は で き な い よう 
な も の も 作れ て し まう の で す . 

アイ コン は , 各 > パ ー ツ を 移動 る せる ハン 
ド の 他 , パー ツ の 形 を 変形 きせ る ハン マー 
や ハサミ , フレ ー ム や ラッパー ツ の 色 を 指定 す 
る ペイ ント ・ デ プラ シ 。 КК ТЧ 
こと の で きる 中 めがね な ど が あり ます . 

ФО, ボー ル の 重き と 速度 。 フ バン ラッ パー 
の 反発 力 や 壁 と フリ ッッ \ー の 弾力 を 自分 の 
好き な 様 に 設定 どき る ワー ルド , 各 パ パーツ 
の 得点 や サウ ンド の 設定 を する アン ド ・ ゲ 
ー ト (ドラ イ バ ー や プラ イマ ヤー を 使っ て 配 
線 す る ) も あり ます . 

et, で き あ が っ だ ビン ボー ル ・ ダ ーー ム 
は と いう と , これ は も う 作 っ た 本 人 の 腕 し 
だ だ いで) よく 考 を た て 余 な か いと 欠 多 マジ アン 
の な つも まい ます よ 、 


《 問 い 合 わせ 先 》 (株 ) コ ンプ ティ ー ク 
99102 東京 都 千 代田 区 隼 町 3-19 


清水 ビル 4F 
会 (03) 234-8041 


だ た だ, ウォータ ダー ハザード や OB な ども あり , 
非常 に 本 物 の ゴル フ に 近い ゲー ム に な っ て 
いま す 。 

プレ イ が 終わ る と , スコ ア や 記録 を モー 
プ す る こ ょ と が で き , さら に プレ イ の 結果 を 
いろ いろ な 角度 か ら 6 分析 を 行ない , 項目 別 
に 評価 を つけ る コン ピュ ー タ 診断 機能 が 付 


いて お り , ゲー ム の 上 達 に 一 役 が っ て いま 
す . 
(Чы ux)? (株 ) エ ニッ クス 


49160 東京 都 新宿 区 西新 宿 7-1-8 
25 (03) 366-4345 


グリ ー ン の 拡大 画面 . バ ー デ ィ ・ チ ャ ンス だ. 


Өс, 七 も 下 も な い ド ツ グ ア アイ ルト を し 
て いる と き の 感 覚 は 含ま で の ソフ ト で は 味 
わ え な か っ だ も の で す . だ た だ, な が 感じ ら 
れれ ない の が と て も 残念 で す . 

スピ ビード が ちょ っ と 遅く て , な め ら か る 
が 足り な い の で す が ,。 これ だ け の 量 の 計算 
と , 画面 の 色付け まで や っ て いる の で すか 
о, 現在 の パソ コン で は これ 以上 望む の は 
無理 だ と 思い ます . 

この ゲー ム で 敵 を ラク に 墜 撃 で きる よう 
に な っ だら, も う 3 次 は 実機 に 乗る し か あり 
ませ ん . ちょ っ と オォ オー バー だ っ だ か な 2? 


(問い合わせ 先 〉 (株) シス テム ソン ソフト 
&5810 福岡 県 福岡 市 中 央 区 渡辺 通 2-4-8 


小学 館 ビ ん 9 F 
® (092) 714-6236 
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モー 一 ル ・ モ ー ル 


MOLE MOLE 


USUS S TABEACuS! 


キャ ラク タ の 動き や 設定 な ど が と て も コ 
ミカ ル な くせ に , 内 容 は 憎たらしい ほど > っ * 


CROSSMEDIA SOFT 
FM-7/NEW7/77, PC-8801/mkII/SR 
カセ ッ ト Y3,800 

ディ スク ( 5 イン チ , 8.5477) Ұ5,800 
( 他 機 種 へ も 移植 中 ) パ ズル 


СТ; は し じ し こ し が あり ませ ん ん ジイ マヤ 
ー は モー ル 君 を 操っ て お いも を 取っ て いく 
ОЭ: 
СЕ, 
まし よう 
9 — #13, 
は 行け ませ ん . 


ズル し て いる と っ て も 楽し い ゲ ー ム の 登場 
t4 

る C, 画面 上 に は 写真 を 見 て の と お り 
お いも ( 他 , キウイ な どの フル ー 
も ぐら の モー ル 君 ,。 モー ル 君 の 家 


この ゲー ム で の 注意 点 を 挙げ て み 
EME は し ご の ある 所 で し か 上 に 
w?) 


片側 は 無事 取れ た が , これ か ら ど うす る ? どこ か ら 手 を つけ れ ば いい の か わか ら な い ! 


Us P dud Ж. 


WEIHD 2 
こら で 回 ビ チッ リッ つ さ ロー ル ワ ピリ インズ! 


“550, 

我々 の 装備 は レー ザー ナイ フ と スペ ー ス 
スー ツ ( 単 な る 宇宙 服 ) だ け と , と て も 貧弱 
だ か が , この 星 に だ っ て 地下 都市 は ある . お 
い お むい 強力 な 武器 や 防具 を 買い 集め れ ば よ 
Root 3 ا‎ Ls, 
怪物 を 倒せ ば 人 金 に 交換 で きる 鉱物 が 得 ら 


KG SOFT 

PC-8801/mkII/SR, FM-7/NEW7/77 
ディ スク ( 5 イン チ , 3.5 イ ンチ ) 、\8,000 
FM-7/NEW7/77 カセ ッ ト Y5,000 
ロー ルプ レイ ング 


我々 は , 宇宙 ポリ ス の 配下 に あり な が ら 
ポリ ス の 保護 を 受け て いな い シ ー ク レッ 
ト ・ ポ リス で ある . THEE LL ТЕ U 72 ARR 
сыз, 我々 の こと を “WEIRD” と 呼ぶ 


prm る 前 に , 
て お こう . 私 は 元 宇宙 海賊 船 の 船長 、 そし 
て 海賊 時 代 の 部 下 , パイロット, 医者 , Ж 
の NH i Lis) ORF5 AT 
55, 

我々 の 任務 は , 宇宙 の を そこ いら 中 に いる 
海賊 や 核 戦 争 な ど で 誕 生 し た 怪物 ども の 退 
治 で ある . と ころ が , ア 星 で 不 思 O 
議 な 情報 を 得 た 

な ん と , この 星 に は あの 永遠 の 命 を 与え 
る と 言わ れる エエ ビルマ パワー が ある らし い の 
2, そこ で , 我々 は 任務 遂行 の つい で に こ 
の モデル フー も いた だ だ ぜ い て し まね おう 5 も 


- > 
м سا‎ 


КЕСЕЛІН» 
(A Жл); 


Ж (Ж EE 


$c ТАВ A 20:3 
Pi 0 に た くさ ん の 3 
ЕЛЕР. 
ТАФ АТО BU) 
Pc- -|24-5 [3^ AL 
pionii? 


川崎 市 PC-1245 | ш Шш: ТИ АЗР? 


寒河江 市 SHINYA 


お いも の 下 を 堀 つ て も , な いも は 落ち て 
きま せん . 
9 モール 君 や 岩 は , 
ち で し まい ます 、 
⑳ エ モール 君 は 岩 を 運ぶ こと が で きま せん . 
お いも を 全部 取っ た ら , 自分 の 家 へ 帰ら 
な けれ ば な り ま せん . 

どう で す ? 注意 し な けれ ば な ら な い の 
は 以上 の 5 つ だ け で す 。 意外 と 簡単 な よう 
に 見 る で じょう 

と ころ が , 一 番 問 題 に な る の が ⑧@ の 自分 
の 家 に 帰ら 6 な けれ ば な ら な いこ と な の で す . 
お いも を 全部 取る の は それ ほど 難し く は あ 
り ま せん (そう で な い 面 も 結構 ある の で す が , 
を そう いう 面 の 方 が 多少 は 楽 な よう で す ). 

Жі, 冬 に は “モー ル ・ モ ー ル 2 を 発 
売 学 定 を の こと 。 それ まで に 全 50 面 クリ ア 
TASC йә}? 
〈 問 い 合わ せ 先 》 日 本 エー・ ブ イ ・ シ ー( 株 ) 
49107 東京 都 港 区 北青山 3-6-18 

共同 ビル 青山 2 Е 

2 (03)486-4121 


穴 に 落ち る と 下 ま て 沙 


れる . と ころ が , この 交換 レー ト が 刻々 と 
変 働 し て いる . レー ト が 低い とき に は 交換 
し ない 方 が いい だ ろう 。 

危険 な 任務 の 遂行 に 加え , エビ ルッ > ワー 
を 持ち 出す な ん て 困難 きわ まり な いこ と だ 
D, それ ほど 心配 する こと は ある まい . な 
に し みろ, 君 と いう 優秀 な 司令 官 が いる の だ 
か ら ね . 
《 問 い 合 わせ 先 〉 (株) ポリ シー 
W541 大 阪 府 大 阪 市 東 区 南 久宝寺 町 2-71 

船場 双葉 プラ ザ 

1% (06)261-4334 


АААААА 


清瀬 市 も ろ ち わん 
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ある 日 PiO 君 は 空 を 飛ん で いま し た -. 

「 お 腹 が すい た な あ … ん ? | 

な ん と 下 の 川 に た くさ ん の 果物 が 流れ て い 
る で は あり ませ ん か ノ 

ro~t j 

X L CPiO3# JINR uU 7-0 C 3». 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


dB-IBASIC コン パイ ラ 


PiO 君 の 飛ぶ 姿 が 実に か わい く 表現 
され て いま すね . それ に カラ ス の タ 
„Айы 6, な か な か ヒョウ キン そう 


У 8 CS 


SR SRE FF 
A^ БЖ 
ЗОФЭР) 
ЭУ УЕЗ SS 
ま " dB-IBASIC イ ンタ ー プ リタ を 起 
С, ジー ス ・ リ スト を 入力 し ます 。 を 
し て 間違い が な いか よく 確認 し , OK な ら 
ば 一 応 テ ー プ に セー し て お きま す . 
次 に ユン フイ ラ を 起動 し , 

TAPE LOAD ? (Y or N)N 

ОВ.) ADR.( > --4000Н) ? 4000 

PORT SAVE(Y or N)Y 

WORK ADR.( « E000H) ? DOOO 

LINE TABLE—N 

と し て コン パイ ポル じじ まず すず: yw, ゲー ム の 
スタ ー ト ・ ア ド Ea a+eena das T 


10 WIDTHAQ: SCREEN の 。 1, 1: CLS4: SCREEN, 0,0: 
CLSA:LOCATE 7,9: COLOR): CSIZES:PRINT4O, "P 


LEASE WAIT":PALETó6,1 

20 CLICK OFF 

50 GOSUB 1520 

40 DIM КХ(1),КҮ(1»,ВХ(7),СК%(1),РҒФ(1,1) 
,TF$GGD ,FR$(7) 。PR 生 (1 。1) 。UX(1) ,UY (1) : HS=Q 
50 ВКФ=СНКФ (ЕНІ) +СНЕФ (&H1D)-«*CHR$ (&H1D) 
6 の СКФ (0)="JK"+BK$+" ZC" 

72 CR$(1)="LM"+BK$+"¥]" 


80 РЕФ (02,0) =" ()"+BK$+"89" 
90 PF$(0,1)2"*-"«*Bk$-":," 


100 РЕФ (1,0) =", –-"+ВКФ+"<=" 

110 РЕФ (1,1) =". /"+8Кф+" y?" 

120 ТЕФ (0) = "ЕА" +ВКФ+"РО" 

130 ТЕФ (1) ="ВС"+86%+ "КӘ" 

140 DF$-"FG"-«*Bk$-"VW" 

150 MF$-"DE"-«BK$-*"TU" 

160 DD$="HI"+BK$+" XY" 

170 PR$(@,Q0)="bc"+BK$+"rs"sPR$(1,@)="| | " 


川 か ら 果 物 が 流れ て くる の で 取っ て 《 だ 
さい. PiO 君 は [4| と |6| キ ー か , ジョ イス 
ティ ッ ク 。 まだ は ハイ フィ パ ー シ ョ ッ トピ ゼ 移 動 
し ます (キー リ ビ ピート は 効き ませ ん . 
53У /). ですから , 飛ぶ だ め に は 必死 
に (で も な い が お) キー を だ だ か な けれ ば いけ 
な い の で す ( ジ ョ イス ティ >F m ode 
<). 

そし て ゲー ム 中 は , カラ ス の タゴ サク が 
フン を 落と し て 邪魔 を する の で よ け て くだ 
5, まだ,。 川 に は ピラ ニア の ピラ 吉 ( 安 
直 な 名 前 /) が いて 襲っ て くる の で , これ 
に も 捕まら な いよ うに 逃げ て くだ さい. € 
れ か ら 。 地面 に いる ゴン ベ ご エ が ライ フル を 
凍っ て て る の で 。 これ も よ け て て 7 どき あい 。 

以上 の よう に し て 上 果物 が 20 個 出 終わ る と 
1 面 ク リア で , 面 が 進む ご と に フル ー ツ が 
変わ b, 敵 が 強く な り ま す ( や だ ら 攻 撃 し 


> > 
t سا‎ 


к Ө Фр sy eal у o ЖИЕ), 


2 


aA 


L^ NEL кыш NUI 
Б a e 
70224 7 А AM 
KAADAA А 


この プロ グラ ム は , PiO4 月 号 
フル ー ツ 目 掛け て 急降下 


SCORE 


15151221512 


ШІ” /РО /-АУАРШ 


+RK$+" 3 і" 
180 FR$(0,1)-"de"«BK$*"tu":PR$(C1,1)2"I a" 
+BK$+" m" 
GN$-"'a"-Bk$-4 "ра" 
UN$z"N'"--CHR$ (C&H1F) *CHR$ (kKH1D) +" ^" 
UD$=" 0" +СНАФ (KH1F)*CHR$ (KH1D)*" " 
PW$="+fg"+BK$+" vw" 
FR$(@)="jk"+BK$+"z (" 
FR$(1)="1m"+BK$+" 1)" 
FR$(2)="no"+BK$+" K" 
FR CS a "«BK$e"—|I" 
ЕК% (4) =" gaa! + BK $ + "2" 
FR$ (5) =" am" +ВКФ+ "У H" 
FR$ (6) =" ШЫ +BK $+" 4— "' 
FL$z"EB"«BK$*" — 
GOSUB 5710 
‘START! 
SC=0: PO=3:RN={:RO=1: ST=1:CLS4』FL= の 
‘ROUND START! 


=, S ty У k= PTS 
グラ ム 化 し だ も の で す ( ち ょ っ と 違う 所 も 
あり ます が …). 

る て 中 身 で す が , まず 初期 , 画面 , メイ 
ン と あら で 。 PCG 定 PARA CO EN 
チン 和 群 が あ り ま す . どう し て こん な 変 な 形 
に な っ て いる か と いう と , だ ん な る 癖 で す . 


АН cD 


ゲー ム ・ ス ター ト の と き , 画面 に タッ ド 


KON 先生 風 の PiO 君 が 出 て きま す . 実は , 


これ も 隠れ キャ ラク タダ と し て 入れ る つも り 


だ っ だ ん で す が , どう いう 風 に 出 そ う か 悩 
むう ち に , 結局 や ゆめ て し まっ だ ん で す … 


まあ , 隠れ キャ ラク タ は 一 つ で も いい で す 
か ら ね (る さて, 何で せ う ? デ ロ グ ラム 読 
みや ゃ わか る けど …)。 

それ か ら 。 参考 文献 の 所 を 見 て わか る と 


3590, この ブロ グラ ム は PiO ジ パー ツ に 支え ぇ 
ら 5 れ て いる の で す -. これ か ら も , 音楽 と か 
に 世話 に な る と 思う の で ,. よろ し てく / 

K3 参 考 文献 

1) ぶ ぷー ちゃん: “ご は ば だ け ビ ピオ ノ /"。 РіО 
2*—, РіО, 85 年 4 月 号 

2) PiO パ マー ツ ・ ミ ュー ジッ ク 。 РіО, 5 年 
3, 6 月 号 

3) 高野 孝一 : “PEARL”, РіО, "85 年 4 月 


ха, 


350 F に = の 1 1 に = の : FT= の 』F ビ =4 』 F ゴ = の : い = の :FP= ニ の 』F 1 
z1:F221:FL-1:IF (RN+2) MOD さ = の THEN F1-0: 
F 2= ェ の F レ = の 

560 'DEAD START 

370 FOR I=@ TO 1:UX(I)-7-1:NEXT 

380 KX (0) =RND (26) :KY (O) =4: IF RO>=2 THEN 

KX (1) =RND (26) :KY (1) =6ELSE КХ(1)--1 

390 FOR I-0 TO7:BX(I)--1:NEXT 

400 TX-2-1:GX-RND (24) +2: RX-RND (22) +2: RM=@ 
410 РХ=14: РҮ=12: PM-0: WA-0:GM-0: PD= の 

420 'm х2 

450 CGENO:IF ST-0 THEN CLS: 65070490 

440 SCREEN 1,1,1: COLOR7:CLS 

450 CGEN1:LOCATE 17,4:PRINT"fg" 

460 LOCATE 17,5: РКІМТ "ум" з CGENO 

470 LOCATE 14,7: РКІМТ "NT 97 !Pi0" 

480 LOCATE 15,10: РКІМТ "ТАКТ! !" 

490 COLOR7: SCREEN ,2,0: CLS 

500 LINE (240,0) – (240,199) ,РБЕТ,7 
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Pese KSEE M as 


Pio 


(147-13 РРО ソー ス ・ リ スト 


LOCATE 32,1:PRINT" + 
LOCATE 32,2:PRINT" | 
LOCATE 22,5: РКІМТ" | 
LOCATE 52,4: РКІМТ" '————— ":CGEN1 
LOCATE 3Z,1:PRINT"i'Q1" 
LOCATE 52,2: РКІМТСНАФ (34) з "#$X%" 
LOCATE ささ 。 さ 』PRINT"2 さ 456" 』 CBENg 
LOCATE 32,6:PRINT"SCORE" 
LOCATE ささ 。B:PRINT "の の の の の の " 
LOCATE 21,10:PRINT"Hi SCORE" 
LOCATE ささ 。12:PRINT'" の の の の の の " 
LOCATE 24,14:РКІМТ"РІ0" 
LOCATE 22,18:PRINT"FRUIT" 
LOCATE 32,22:PRINT"B chan" 
CGEN1:LOCATE 21,22:PRINT"'":LOCATE 3 
3,2213 PRINT"x" 
560 CGENO:LOCATE 32,23:PRINT"Kauchan" 
670 CGEN1: LOCATE 31,22:PRINT"7":CGENO 
IF ST=Ø THEN 720 
LINE(9,120) – (259,152) ,PSET, 5, BF 
LINE(Q,153) -(239,199) ,PSET, 4, BF 
LINE (0,0) – (259,119) ,PSET, 6, BF 
LINE (0,120) - (259,127) ,PSET, 4, BF 
CGEN1 
FOR 1=@ TO 1:1F КХ(1) <>-1 THEN LOCAT 


NEXT 
LOCATE РХ,РҮ: РКІМТРЕФ (РМ,РХ MOD 2) 
LOCATE RX,17:PRINTPR$(RM,RX MOD 2) 
LOCATE GX,21:PRINTGN$ 
IF РО-1=0 ELSE FOR I-1 TO PO-1:LOCAT 
E 3O*I*2,15:FRINTPF$ (0,0) : МЕХТ 
800 LOCATE 51,19: РКІМТЕКФ (RN-1) ;  CGEN: PR 
INT" 2"iRN«SQ«(RO-1)*5 
810 IF ST=Q THEN COLOR 7:60TO 960 
820 FOR I-0 TO 259 STEP В 
830 COLOR(I/8)MOD3*1:POSITION 1,128:РАТТ 
ERN-22,8TRING$ (3, HEXCHR$ ("の の の の 6 の 9 1890600 
の ") ) 
840 COLOR 4:POSITIONI,145:PATTERN-8,HEXC 
HR* ま ("の の の の の の 1 さじ 7FFFFF " ) 
850 NEXT 
860 COLOR 7 
870 PALET1 。 1 
880 PALET2,5 
890 PALET3,S5:CL-1 
CIRCLE (80,119) ,50,4,80,0,180 
PAINT (80,100) ,4,%н20 
CIRCLE (160,119) ,50,4,60,0,180 
PAINT(160,100) 。4 。&H さ の 
CIRCLE (80,119) ,50,6,80,0,180 
LINE(Q,119) -(229,119) ,FPSET,6 
LOCATE 32,8:PRINTRIGHT$ ("の の の の の "+STR$ を 
(SC) ,5) "а" 
970 LOCATE 32,12:PRINTRIGHT$ ("00000" «STR 
$ (HS) ,5) «"Q" 
980 ‘GAME 
990 SCREENO,0,0: TEMPO 300 
1000 IF ST=1 THEN PLAY"OSLZ«CGEFDEC-G&GG 
D#G#A#GGA: 5C6C1C1C6C1C1C6C1C1D6D1D1』046 
46161666161#646161#A6A1A1 
1010 IF ST=1 THEN PLAY"ObLICGFEDEC-G#GG+ 
DSE7: 05C6C1C1C6C1C1C5D5D7』 OSE6E1E1E6E1E1 
FSF587":8T20: ' (С) 277" - | 
1020 IF ST= の THEN FLAY"CODOEOGFOGO" 
1030 PLAY"V16:V1305":TEMPO7500 
1040 RESTORE1200 
1050 ‘MAIN 
1060 CBEN1 
1070 IF SC>=5 の の AND PL= の THEN PO-PO«1:BE 
EF10:FPL-1:FOR Ісі TO FO-1:LOCATE 5@+1+2, 
15: PRINTPF$ (0,0) : NEXT 
1080 IF STRIG(JOY) = の AND STICK(JOY)-Q TH 
EN KB-Q 
1090 IF. КВ=0 AND(STRIG(JOY) <>0 OR STICK( 
JOY) < >2) THENWA-O: GOSUB 2580 ELSE IF CO M 
DD2B= の GOSUE 2720: ‘KEY 
1100 MOD 50-0 THEN GOSUB 2800 
1110 MOD 15-0 THEN БОБОВ 2890 
1120 MOD 45-0 GOSUE 2980 
1150 MOD 80-0 GOTO 5080 
1140 MOD 45-5 GOSUB 3220 
1150 MOD 15=5) АМО TX«»-1GOSUB2300 
1160 IF PD=1 THENSOUND7,255:G0T03270 
1170 IF CO MOD 10-1 THEN READMUS: IFMU$-" 
END" THENRESTORE 1 200: READMUS 
1180 IF MU$-"RO"THENMUS$-"" 
1190 PLAY": "+М0Ф: SOUND , НЕЮ 
1200 DATA G0,G0,G0,G60,E0,E0,G0,G0,A0,^0, 
Е0,Е0,Е0,Е0,Е0,Е0 
1210 рата G0,G0,G0,G0,E0,E0,G0,G0,40,60, 
Е0,Е0,Е0,Е0,Е0,Е0 
1220 рата DO,DO,DO,DO,CO,CO,DO,DO,EO,EO, 
C0,CO0,CO,CO,CO,CO 
1230 рата DO,DO,DO0,DO,CO,CO,DO,DO,EQ,EO, 
C0,CO,CO,CO,CO,CO,END: ' (C) T. GRAPHICS 
1240 IF CO MOD 20-1 THEN CL=CL+1:IF CL=4 
THEN CL=1 
1250 IF CL=1 THEN PALET1,1:PALET2,5:PALE 
13,5 
1260 IF CL=2 THEN PALET1,5:PALET2,1:PALE 
T3,5 
1270 IF CL=3 THEN PALET1,5:PALET2,5:PALE 
T3,1 
1280 IF INKEY$(QO)-CHR$(&HiB) THEN 1280 
1290 СО=С0+1:1ІҒ CO-2001 THEN CO-Q 
1295 IF SC> さ 29 の の THEN LOCATE 12,1:CGENO: 
COLOR2:PRINT"GIVE UP''":GOTO 5520 
1590 GOTO 1050 


1310 END 

1320 DEFCHR$ (105) “НЕХСНК%("00045Е44444С5 
o690800045E444440C560800045E44444C5608" ) 
1550 DEFCHR$( 32)-HEXCHR$ ("2000000000000 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
1540 DEFCHR 和 ま ( 55) = ニ HEXCHR ま ("の 6 の EBCBBBB9B 人 Rn 
C10060RRC888898AC10060BBCB88898AC10" ) 
1350 DEFCHR$( 34)-HEXCHR$("ZF7F7F7F7E7E7 
F7F3F404043424243405F7F7F7F7E7E7F7F") 
1360 DEFCHR$( 395)-2HEXCHR$("FOFCFEFF1F1FF 
FFFFOOCO2E11111E101FOFCFEFF1F1FFFFF") 
1370 DEFCHR$( 36)-HEXCHR$("3ZC7E7E7E3COQ03 
С7Е5С4242425С005С425С7Е7Е7ЕЗС003С7Е") 
1580 DEFCHR$( 57) =HEXCHR$ ("O3OF 1F SF SF 3E7 
C7COSOC102021224444030F 1F SF 3F SE7C7C") 
1390 DEFCHR$( 38)-HEXCHR$ ("COFOF8FCFC7C3 
ЕЗЕС050080484442222СФОҒОҒКВЕСЕС?ТСЗЕЗЕ") 
1400 DEFCHR$( 39)=HEXCHR$ ("3844828282824 
4383844828282824438:8449060202904438") 
1410 DEFCHR$( 40) =НЕХСНКФ ("2001030705030 
10100010:077DFFFFFF200103077DFFF9F9") 
1420 DEFCHR$( 41)= ニ HEXCHR ま ("の の COE ウ F の 7 の FFF 
FFE の の COE の OF の 7 の FFFFFE4 の E の F ウ F ウ 7 の FFFFFE" ) 
1430 DEFCHR$( 42)=HEXCHR$ ("0001050502050 
30300010:3573FEFFFFFF00010373FEFFFSF3") 
1440 DEFCHR$( 43)-HEXCHR$ ("aOCOEOFQOFBFCF 
СЕЕ@@С@Е@Е@ЕВЕСЕСЕЕ4@Е@Е@Е@ЕВЕСЕСЕЕ" ) 
1450 DEFCHR$( 44) =HEXCHR 和 まま ("の の の さ の 7 の F の EFFF 
F7F0003070FOEFFFF7F02070FQFOEFFFF7F") 
1460 DEFCHR$( 45)-HEXCHR$ ( "ООВОСОЕОРОСОВ 
の 8B の の の 8 の COE の BEFFFFFF の の B の CO の E の BEFF9F9F" ) 
1470 DEFCHR$( 46) =HEXCHR* ま ("の の の さ の 7 の F 1F SF 3 
F7F000:070F1F3F3F7F02070FQF1FS3FIF7F") 
1480 DEFCHR$( 47)-HEXCHR$ ("2OBOCOCOS5OCOC 
の Cg の の 8B の C の CE7FFFFFFF ウ の 8B ウ CgCE7FFFCFCF" ) 
1490 DEFCHR$( 48)-HEXCHR$("00107C102C224 
04C00107C102C22404C00107C102022404C" ) 
1500 DEFCHR$( 49)-HEXCHR$ ("0200088BC88888 
810000088BC88888810000088BC88888810" ) 
1510 ПЕЕСНК%( SQ)-HEXCHR$("7F7F7F7F7F7F7 
F3E40404041414141:3E7F7F7F7F7F7F7F SE") 
1520 DEFCHR$( 51) =HEXCHRS$ ("FEFCFa0000000 
の の の の 2 の じ ビ F の の の の の の の の の の の FEFCF の の の の の の の の の の の " ) 
1930 DEFCHR$( $52)-HEXCHR$("7E7E7E7E7E7E7 
E3C424242424242423C7E7E7E7E7E7E7E SC") 
1540 DEFCHR$( $3)-HEXCHR$("7C7CSES3F3F1FQ0 
F034444222120100CQ0327C7C3E3F SF AFOF QS") 
1550 DEFCHR$( $4)-zHEXCHR$("3E3E7CFCFCF8F 
0C022224484040830CO3ES3E7CFCFCF8F OCD" ) 
1560 DEFCHR$( 55)=HEXCHR$ ("3844828282824 
45858448282828244585844ВАААВАА24438") 
1570 DEFCHR$( 56)=HEXCHR$ ("0307070703000 
0007Ғ5Ғ07575В5Сс1Сс00772Ғ070705000000") 
1580 DEFCHR$( 57) =НЕХСНКФ ("FFFEFCFOE2O000 
の の gFFFEFCF の FC さ C さ B の の FFFEFCFOE の の の の の の の " ) 
1590 DEFCHR$( 58)=HEXCHR$ ("0507070501000 
の の の 7F の 7 の 7 の F ウ F の 7 の さ の の 77 の 7 の 7 の さ の 1 000000") 
1600 ПЕЕСНКФ( 59) =HEXCHR 生 ("FFFEFFFFF の の の の 
の の の FFFEFFFFFC さ C18 の の FFFEFFFFF の の の の の の 9 の" ) 
1610 DEFCHR$( 6 の ) =HEXCHR 和 まま ("FF フ F さ F の F の 7 の の の 
の の の FF 7F SF OF SF SC 1 COOFF 7F 3F OF 27 020000" ) 
1620 DEFCHR$( 61) =HEXCHR ま ("CE の E の E の Cg の の の 
の gFEFCE の OECDC さ じ さ B の の EEF 4EOE の CO の の の の の の 9" ) 
1630 DEFCHR ま ( 62)-НЕХСНК%("ҒҒТҒҒҒЕҒОҒОО О 
の の の FF 7FFFFF さ F さ じ 18 の の FF7FFFFF の FOO の の の " ) 
1640 DEFCHR ま $( 6 さ ) =HEXCHR* ま ("COE の E の COB の の の の 
の の の FEEOE の F の FOE の CO の の EEE の E の CO の B の の の の の の の " ) 
1650 DEFCHR$( 64)= ニ HEXCHR 和 ま ( "の の の の の 9C1F 1F さ F2 
BSF の の の の の C1F 1F SF 2BSF の の の さ の F 1F 1FSF2BSF" ) 
1660 DEFCHR$( 65)-HEXCHR$ ("20000387DFFFF 
FFE ウ の の の の さ B7DFFFFFFE の の の の 8 さじ ZDFFFFFFE" ) 
1670 DEFCHR$( 66)-HEXCHR$ ("2OOOCOE1FBFFF 
F7FOQOOCOE 1FBFFFF7FOOODC1IESFBFFFF7F") 
1680 DEFCHR$( 67)-HEXCHR$("OOQOQOF8FGFCD 
4FC の の の の さ の FBFBFCD4FC9 の COF の FBFBFCD4FC") 
1690 DEFCHR$( 68)-HEXCHR$s ("0000010307050 
30100000103077DFFFF20000103077DFFFF ") 
1700 DEFCHR$( 69)-HEXCHR$("OOOOCOEOF OF OF 
orroooocoEOFoFOFOFFOOADEOFOFOF OF OFF " › 
1710 DEFCHR$( 70) =HEXCHR* ま ("の 2 の 5 の 5 の 7 の F 1F さ 
F さ F の 2 の 5 の 5 の 7 の F 1F ミ F さ F の 2 の 5 の 5 の 71F さ F7F さ F" ) 
1720 DEFCHR$( 71) =НЕХСНК® ("EOF8FBFCFCFCF 
CFCEOFS8FEFFFFFCFFFFEOF8FBFCFCFCFCFC" ) 
1730 DEFCHR$( 72)-2HEXCHR$ ‹"00000040Е0ғ07 
CFFØ7ØF 1FSFFFFF7F7F070B13SSFSFF7F7F") 
1740 DEFCHR$( 75) =НЕХСНКФ ("00000010182C7 
CDDCOE の E の F の OFBECFCDBCOE の PE の F の FBECFCDB" ) 
1750 DEFCHR$( 74) =HEXCHR$ ("0000010001000 
の の の の の 7C7F さ E7F フ 7F ミ FFF の の の の 9 10001000000") 
1760 DEFCHR$( 795)-HEXCHR$("70F8FCOOCCF87 
の 9 の 97 の FBFC9 の CCFEFFFC7 の FBFC の の CCFE77 の 4" ) 
1770 DEFCHR$( 76) =HEXCHR 生 ("の の の の の 1 の の の 1 の の の 
の の の の の の の の 1 の 2 の F 1F さ FFF の の の の の 1 の の の 1 000000" ) 
1780 DEFCHR$( 77) =НЕХСНКФ ("70F8FCOOCCF87 
の 9 の 7 の FBFC の の CEFFFCFC7 ウ FBFC の の CEFF74 の 4" ) 
1790 DEFCHR$( 78)-2HEXCHR$ ("2000000022042 
41408103C3E777F767F081034207777747F") 
1800 DEFCHR$( 79)-HEXCHR$ ("2000000022042 
49408103C3E777F767F0810:34207777747F") 
1810 DEFCHR$( 80)-HEXCHR$ ("0501010101000 
QOQ3F7FFFFFFF7C380Q03F7FFFFFF974280Q" ) 
1820 DEFCHR$( 81)-HEXCHR$ ( "FEFCF8FCF8000 
の の の FEFCFBFEFE2E2COOFEFCFBFCFB の の の の の の " ) 
1850 DEFCHR ま ( 82) =HEXCHR$ ("7F 3F 1F さ F 1F の の の 
Q007F3F1F7F7F7434007F 3F 1F 3F 1F の の の の の の " ) 
1840 DEFCHR ま ( 85) =HEXCHR* ま ("COB の OB の BOB の の の の 
の の の FCFEFFFFFFSE 1C の の FCFEFFFFF2E14 の の " ) 
1850 DEFCHR$( 84)-HEXCHR$("010307074F SFO 
の の の FFg ウ 7 の F 1F さ 6 の の の の の の FF ウ 7 の F 1F さ 6 の の の の 999 の" ) 


1860 DEFCHR$( 85)-HEXCHR$("FFFFFFFEFFFEO 
QooorFFFFFFED2000O0OOFFFFFFFED2000000" ) 
1870 DEFCHR$( 86)-HEXCHR$("3B160CODOD0000 
000:B170F07070707023B170F0707070703") 
1880 DEFCHR$( 87)-HEXCHR$("FC1COG0000000 
の の の FCFCFBFBFBFBF の OE の FCBCEBBDBEBF@F の E の " ) 
1890 DEFCHR ま ( 88) =НЕХСНКФ (" 7F 7FBF7F7FAAQ 
の の の さ F 1F の D 1 0 の の の の の の の の さ F 1F の D1n の の の の の の 9 の " ) 
1900 DEFCHR$( 89)-HEXCHR$("FRF9FBF7FEAAQ 
の の の 9F ヨ FB685 の の の の の の の の の FBFC6C5SB の の の の の の の の " ) 
1910 DEFCHR$( 90) =HEXCHR$ ("2000000000000 
の の の FF7FSF 1F の の の の の の の の の の の の の の の の の の の の の の の の " ) 
1920 DEFCHR ま ( 91)=HEXCHR ま ("の の の の の の の の の の の の の 
の の の FFFEF の CO の の の の の の の の の 7 の 6 の の の の の の の の の の の 0 の" ) 
1930 DEFCHR$( 92) =HEXCHR 和 ("の の の の の の の の の の の の の 
@@@ЕЕ7ЕЗЕ 1F ミ F の の の の の の の の の の の の の の の の の 9 の の の の " ) 
1940 DEFCHR$( 93) =HEXCHR ま ("の の の の の の の の の の の の の 
の の の FCFFF 2B の の の の の の の の の の 4 の 7 の 2 の の の の の 9 の の の の " ) 
1950 ПЕЕСНК%( 94) =HEXCHR$ ("0018040014180 
0007F 3D56F7E7F 3F1EOQSB3SD6OFSA7S1F 1800") 
1960 DEFCHR$( 95)-HEXCHR*$*("53DA6DO000000 
の の の 2 じ の の の の の の の の の の の の の の の 8 の の の の の の の の の の の の の の " ) 
1970 DEFCHR$( 96) =HEXCHR 和 ("の の の の の の の の の さ の 4 の 
4 の 4 の の の の の の F 1 じ さ B さ BE さ E ウ の の の の さ の F 1F SF SF SF") 
1980 DEFCHR$( 97)-HEXCHR$("1C1C1COCCA4202 
の 2 の 9 の の の の CO の F の 3BDCDCDCO の の の CFOFBFCFCFC") 
1990 DEFCHR$( 98) = ニ HEXCHR も ("の の の の の F さ F フ F フ FF 
FFF の の の の の の の 90 の 8 1 の 2 の の の の の の の の の の の の 8 102000") 
2000 DEFCHR$( 99) =HEXCHR ま ("の の の の B の E 1F さ FFF 
FFF の の の の の の の の の の の の の の の の の の の の の の の 9 の の の の の の の " ) 
2010 DEFCHR$( 100)-HEXCHR$("OOQOODFZF7FFF 
3rFarooo00608008820080000050800882008" ) 
2020 DEFCHR$( 101) =HEXCHR* ま ("の の の の の E 1F さ FF 
FFFF の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の "' ) 
2050 DEFCHR$( 1 の 2)= ニ HEXCHR* ま ("の の の の 9 の の の の E の 人 n 
の E の の の の 9 の 1 の 7 の F の OF1EB1F1F の の の 1 の 7 の F の F1B1F1E") 
2040 DEFCHR$( 105) -НЕХСНК% ("200000007050 
70000080EOFOFODSFSF8OOSOEOF OFODSF878") 
| 2050 DEFCHR$( 104)-HEXCHR$ ("2000200000000 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の" ) 
2060 DEFCHR 生 ( 1 の 6) =HEXCHR 生 ("の の の の の の の の の の の の 
の 9 の の の の 9 の の の の の の の の の の 9 の の の の の の の の の の の の の 9 の の 9192") 
2070 DEFCHR$( 107) =НЕХСНКФ ("000000000000 
の の の の の の の の の の の の の の の の の の の の 787B さ の さ の 5 の 9 の 1 の 1 の ") 
2080 DEFCHR$( 108) =HEXCHR$ ("000000000000 
4 の 4 の の の の の の の の の 1F7FFBFC の の の の の の の の の の の の 4 の 4 の "') 
2090 DEFCHR$( 109) =НЕХСНКФ ("200000000000 
の の の の の の 9 の の の の 4 の FBFEDF さ F の の の の の の 4 の 4 の 8 の 8 の の の" ) 
2100 DEFCHR$( 11 の )= ニ HEXCHR 和 ("の の の の の の の の の の の の 
の の の の の の の の の の の の の の の Q さ の 7D の の の の の の の の の 1 の 5 の F の 2 " ) 
2110 DEFCHR$( 111) =HEXCHR$ ("200000000000 
の の の の の の の の の の の の の の BE の 1 じ 7E の の の の の の の の の の 4 の E の 8 の " ) 
2120 DEFCHR$( 112)= ニ HEXCHR 和 ("の 7 の さ の の の COF の 7 
1E1ES81COFOFOFO700003F1FOFOFOFQO70000") 
2130 DEFCHR$( 113)-2HEXCHR$ ("EOCAOCSCDCDO 
78781C3BFCFCDBD の の の の の FCFBFCFCDBD の の の の 0 の" ) 
2140 DEFCHR$( 114) =HEXCHRS$ ("FFFFFF7F7F SF 
@Е@@2@@@^8в@@@@@@@@@0@2@@@^8в@@@2@@@@@@@" ) 
2150 DEFCHR$( 115)=HEXCHR ま ("FFFFFFFEF 1E の 
B の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2160 DEFCHR$( 116) =НЕХСНКФ ("Q7070F8FFFFF 
さ F の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2170 ПЕҒСНК%( 117) =HEXCHR$ ("FFFFFFFBF1EQ 
B の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2180 DEFCHR$( 118)-HEXCHR$ ("200000000000 
さ の 1 の 1F6FFF7F1FgFSE1 の 1C6FFF7F1FOFSB19") 
2190 DEFCHR ま も ( 119)-HEXCHR$ ("200000000000 
の C の BFBF6FFFEFBF の DC の B さ BF6FFFEFBF の DC の B" ) 
2200 ПЕҒСНК%( 120)-HEXCHR$("7E0042424246 
24007Е004242424658007Е00424242465А00") 
2210 ПЕҒСНК%(% 121)-HEXCHR$("QOO0O000000000 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の "' ) 
2220 DEFCHR$( 122) =НЕХСНКФ ("2002040004089 
S50aa387CFEFEFE7428000420400040000000" ) 
2250 DEFCHR$( 125) -нЕХСНК%("00204000400Үғ 
S608387CFEFEFE7428000020400040000000" ) 
2240 DEFCHR$( 124) =НЕХСНКФ ("204040402008 
S5BEFFFFFFFFFF772 の の の の 4 の 4 の 4 の 2 の の の の の の 9" ) 
2250 DEFCHR$( 125)-HEXCHR$ ("0200000000054 
1 255FFFFFFFFFF5QREC の の の の の の の の の の の の の の の の の の 9" ) 
2260 DEFCHR$( 126)-HEXCHR$ ("400040402022 
DSe6AaFFFFFFFFFFSD208004000404020000000 " ) 
2270 DEFCHR$( 127) -нЕХСНК% ("000000000020 
55QQFFFFFFFFFFDEQB の の の の の の の の の の の の の の の の の の " ) 
2280 DEFCHR ま ( 128) =HEXCHR$( "の の の の の の の の の の の の 
の の の の の の の の の の の E 1F ミ F さ 6 ス F の の の の の さ の 4 の の の の の の の の " ) 
2290 DEFCHR$( 129)=HEXCHR$( "200000000000 
の の の の の の の の の の 5 の FBFCECFCO の OB の CO の AO の の の の の の の の " ) 
2300 DEFCHR ま ( 150) =HEXCHR$ ま ("の の の の の の の の の の の の 
の の の の の の の の の の の の の の の 0 さ の 7D の の の の の の の の 9 1 OF SF 57" ) 
2310 DEFCHR$( 151) =НЕХСНКФ ( "の の の の の の の の の の の の 
の の の の の の の の の の 9 の の の の B の 1C7E の の の の の の の の の の F OECD") 
2320 DEFCHR$( 152) =НЕХСНКФ ‹ "000000000000 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2330 DEFCHR$( 133) =НЕХСНКФ "000000000000 
の の の の の の の の の 9 の 1E 1Е0С08500000001Е1Е0С1С7С" ) 
2540 DEFCHR$( 154) -НЕХСНК% ("000000090224 
2D000000000902242D000701071F3F7F7FFF") 
2350 DEFCHR$( 135)=HEXCHR$ ("000080402050 
2CC20000804020502CC2EQ0O0EOFS8FCFEFEFF ") 
2360 DEFCHR$( 144)=HEXCHR$( "000000005029 
1 2D さ ら う F 1E1F の の 6 の 5 の の の の の の の の の の の の の の の の の の 9" ) 
2370 DEFCHR$( 145)-HEXCHR$ ("200000000514 
4854DCFC68F8DOEO20000000000000000000 " ) 
2380 DEFCHR$( 146)-HEXCHR$ ("2000002000022 
D56QnFFFFFFFFFF5D2n ウ の QAD5SQAD5QQA5S52A の の " ) 
2390 DEFCHR$( 147) =НЕХСНКФ ("000000000020 
SSAaaFFFFFFFFFFDEABGODABSSABSSABSOA809Q" ) 
2400 DEFCHR$( 148) =НЕХСНКФ ("000 


yl/O で むか ー し は や っ た 都会 砂漠 人 間 さ ん の 性 面 算 を みん な 知っ て いま すか ? その プー ム を PiO に も / と いう こと で , 僕 も 作っ て み ま 
572: (DURUSEI + MAISON = RUMIKO (2)КАМ + ROM - CPU (2 は と て も 簡単 で す 27, (1) は な か な か で き な いと 思い ます . 解 は 1 
つと は か ぎり ませ ん . 答え が わか っ だ ら PiOPiO に 送っ て くだ さい ね / РіО: ЯЯ л を 起こ そう / 


( 1 人 で さけ ぶ ー 刻 館 ) 


2410 DEFCHR$( 149)-HEXCHR$ ("の の の の の の の の の の の の 
の の の の B26QDARE77EE1CFBFEFEFEFFFFFEFCFB") 
2420 DEFCHR$( 150) =HEXCHR$ ( "5Е0459221Сав 
SS5EASE の 4 さ 92218919 の の 9FFFFFF7F7B15 の QA の の " ) 
2450 DEFCHR$( 151) =НЕХСНЕФ ("601 4408690ҒҒ 
F56a601440B600BO2000FFFFFFFEGEBO2800") 
2440 DEFCHR$( 156) =HEXCHR$ ("の 9 の の の 187CFFF 
FFFF の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2450 DEFCHR$( 157) =HEXCHR 和 ("の の の の F の FCFEFE 
FFFF の の OO の の の の の 1 0 の B の 4 の の の の の 0 の の の の 1 0080400") 
2460 DEFCHR$( 138)-HEXCHR$("20000187CFFF 
FFFF の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
2470 DEFCHR$( 139)-HEXCHR$ ("の の の の FOFCFEFF 
FCF の の の の の 6 の 1 の の の 1 1 の 4 1 の の の の の 6 の 1 の 9 の の 1 10419") 
2480 DEFCHR$( 14Q)-HEXCHR$ ("の の の の の の の の の の の の 
の の の の の の の 97ACFE さ 7B1FCF の の の の の 2 の さ の さ の ささ の くさ" ) 
2490 DEFCHR$( 141)-HEXCHR$ ("200000000000 
の 9 の の の 9 の 9 の 9 の COF の FEFCFO の の の の の の COF の FEFCF の ") 
2500 DEFCHR$( 152)-HEXCHR$ ("FFFFFFDF8FQ7 
の 1 の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の 9 の の " ) 
2510 DEFCHR$( 153)-HEXCHR$("FFFFFFFEFEFC 

F の の の の 4 の の 15 の の の の の の の の の の の 4 の の 1 5 の の の の の の の の の 9" ) 
2520 DEFCHR$( 154)-HEXCHR$ ("FFFFFFDF8FQ7 

の 1 の の の の の の の の の の の の の の の の の の の の の の の の の の の の 0 の の の の の" ) 
2550 DEFCHR$( 155) =HEXCHR$ ("EQEQFQF 1FFFF 

FC の の の OO の 9 の の の の の の の の の の の の の の の の の の の の の の の の の の の の" ) 
2540 DEFCHR$( 156)-HEXCHR$ ("000000000000 

の の の の 7B の さり 2 の 2 の 0F の の の の の の の さ の さ の 2 の 2 の F の の の の の の " ) 
2550 DEFCHR$( 157)-HEXCHR$ ("000000000000 

の の の の COO の の の の の B の の の の の の の じ の の の の の の の B の の の の の の の" ) 

2560 ПЕҒСНКФ (104) -HEXCHR$ (" 1C3E7F 7F7F 7F 7 

FOQ1C3E7F7F7F7F 7FOO0000000000000000") 

2570 RETURN 

2580 IF STRIG(JOY)--1 OR STICK(JOY) =4 TH 

EN W-Q 

2590 IF STICK(JOY) =6 OR STICK(JOY) = さ THEN 
M= 1 

2600 IF PX<1 AND W=@ THENRETURN 

2610 IF PX>27 AND W-1 THENRETURN 

2620 CGENQ:LOCATE PX,PY:PRINT" 
"s: CGEN1 

2630 IF M= の THEN РМ=@:РХ=РХ-1 

2640 IF Wz1 THEN РМ=1:РХ=РХ+1 

2650 IF PY>1 THEN FY=PY-1 

2660 LOCATE PX,PY:PRINTPF$(PM,PX MOD 2) 

2670 IF РХ=@ AND PY=1 AND F1= の THEN F1=1: 

BEEP2』 SC=SC+ 1 の 

2680 IF PX-28AND PY=1 AND F2= の THEN F2=1: 

BEEP2』 SC=SC+1 の 

2590 IF F1=1 AND F2-1 AND FL-Q THEN LOCA 

TE 13,1:CGEN1:PRINT FL$:FP-1:CGEN 

2700 IF PX=1 さ AND PY=1 AND ЕР-і THEN BEE 

Р5:ЕР-0:5С-5С%100:Ғі-і 

2710 CGENO:LOCATE 33,8:FRINTRIGHT$ ("0000 

の "+STR$(SC) ,5) «"Q" 

2720 KE=1 : RETURN 

2730 CGENO:LOCATE PX,PY:PRINT" 
"s CGEN1 

2740 IF PY=16 THEN 2770 

2750 IF PM=Q THEN IF PX>1 THEN PX-PX-1 E 

(БЕ РМ=1 

2760 IF PM=1 THEN IF РХ<27ТНЕМ PX=PX+1 E 

LSE РМ=@ 

2770 IF РҮ<16 THEN PY=PY+1 

2780 IF РҮ<16 THEN LOCATE PX,PY:PRINTTF$ 
(PM)ELSE LOCATE PX,PY:PRINTMF$1WA-1 

2790 RETURN 

2800 FOR I=Q TO 1 

2810 IF KX(I)2-1 THEN2880 

2820 CGENØ: LOCATE KX(I),KY(ID:PRINT" "+C 

НКФ (&H1F)*CHR$ (&H1D)*" " 

2830 KX(I)9KX(I)*1: IF KX (1) >28 THENLOCAT 

E KX (I) ,KYCD 1 PRINT". "*CHR$ (C&HIF) *CHRS Ck 
H1D)+" "sKX(I)=Q . 

2840 CGEN1:LOCATE KX(I),KY(DO) :РКІМТСКФ (К 
X(1) MOD 2) 

2850 IF RND(20)«RN AND UX(I)=-1 THEN UX( 
D 2KXOD:UYCGD 2KY CI +1 

2860 FF=Q: IF (KX(I)9PX OR KX(I)*19PX OR 
KX (I1) -1=РХ) THEN FF=1 

2870 IF FF=1AND (KY (I1) =РҮ OR KY(I)+1=FY 0 
R KY(1)-1=PY) THEN PD=1 

2880 NEXT: RETURN 

2890 FOR I=Ø TO 1 

2900 IF UX(I)2-1 THEN295 の 

2910 LOCATE UX (1) ,UY (I) :CGEN:PRINT" "j 
2920 UY(I)=UY(I)+1:IF UY(I)=16 THEN LOCA 
TE UX (1) ,UY (I) : CGEN1 : PRINTUD$; : GOTO2950 

2930 IF UY(I)=17 THEN LOCATE UX(I),UY(I) 


LU + ビビ ドキ + " 


" “ЕК%- " 


MEL I 


Ж... а 


-1:PRINT" "i CHR$(kHIF)-*CHR$(XH1D);" 
X(I)2-1: GOTO2950 

2940 CGEN1:LOCATEUX (I) ,UY (I) :*PRINTUNS$ 
2950 IF (UX(I)=PX ОК UX(I)-1-PX)AND (UY( 
I)2PY ОК UY(I)-1-PY OR UY(ID)*1-2PY) THEN Р 


"sU 


D=1 


2960 NEXT 


2970 RETURN 


2980 CGENO:LOCATERX,17:PRINT"  "4Bk$-" 


2990 IF WA=Ø THEN 5020 


5000 IF PX>RX THEN КМ=1 ELSERNM= の 


5010 GOTO 5040 


5020 IF КХ<1 THEN RM-1 


5050 IF КХ>27ТНЕМ RM-Q 


5040 IF RM-O THEN RX-RX-1 ELSE RX-RX-*1 


5050 CGEN1 : LOCATE RX,17:PRINTPR$(RM,RX M 


OD 2) 


3060 IF (RX=FX OR КХ-і=РХ OR RX*1-PX) AND 
WA-1 THEN PD=1 

5070 RETURN 

5080 F ビ =FC+ 1 』 IF FC=6 AND ҒК=<19 THENF ド =F 


К+1:ВХ (РЈ) = の : FC=Q: F ゴ = ニ FJ+1 』 IF FJ=7 THEN F 


4-0 
5090 FOR І-0 TO 6:CGENO 


3100 IF ВХ(І)--і THENIK-IK*1: 60705180 


3110 LOCATE BX(I),16:PRINT" ";CHR$(&H1F) 
;CHR$ (&H1D);" " 


5120 BX(I)=BX(I)+1:zIF BX(CI)z29THEN LOCAT 
Е BX(I),16: PRINT" "iCHR$(KH1F) ; CHR$ (&H1D 


);" "sBX(I)=-1:FT=FT+1:GOTO 3180 


5150 CGEN1:LOCATE ВХ (1), 16: РКІМТЕКФ (RN-1 


) : 
5140 IF Wà-1 QND(BX(1)=PX OR EX(1)+1=FX ) 


ELSE 3180 


3150 CGENO:LOCATE ВХ(1),16:РБІМТ" 
+ " " 


"+BK$ 


3160 SC=SC+5#RN+ (RO-1) #5: BEEP1 

3170 LOCATE 55,8: РКІМТКІБНТ% ‹ "00000" «STR 
% (SC) ,5) +"@": ВХ (І) =-1 

3180 NEXT 

3190 IF IK>6 AND FK>=2 の THEN さ 64 の 
3200 1 に = の 

3210 GOTO 1140 

3220 CGENO:LOCATE GX,21:PRINT" “"+BK$+" 
3230 IF КМ0 (50) <КМ THEN IF GM= の THEN GM= 
1 ELSE GM-Q 

3240 IF GM=1 THEN BX=GX+1』IF GX>27THEN б 
M= の 

3250 IF GM= の THEN GX-GX-1:1F GX«2 THEN б 
М=1 

3260 CGEN1:LOCATE 6X ,21: РКІМТБМФ 

3270 IF КМ0 (60) <КМ AND TX=-1 THEN TX=GX: 
TY220: SDUND6 , 51 : SDUND7 , &HF 7: SOUNDS , 16: SO 
UND12,15: SOUND13,1:WAIT100: SOUND7 , &HFD 
3280 IF RND(10)<RN AND GX-PX AND TX=-1 T 
HEN TX=BX: ТҮ=20: SDUND6 , 31 : SOUND] , &HF7:S0 
UNDE, 16: SOUND12,15: SOUND13,1:WAIT100:50U 
ND7 , HF D 

3290 RETURN 

ささ の の CGENO:LOCATE TX,TY:PRINT" " 

3310 TY-TY-1:IF ТҮ--ІТНЕМТХ--1:060Т0 ささ 5 の 
ささ 2 の LOCATE TX,TY:CGEN1:PRINT"h" 

5550 IF (TX=PX OR TX-1=FX) AND(TY=PY OR T 
Ү-ісРҮ) THEN PD=1 

5540 1 に K= の 

ささ 5 の RETURN 

3360 'DIE.. 

3370 IF МА=1 THEN 3420 

3380 SOUND7,&HFE: SOUND8,15:FOR ІсРҮ TO 1 
5: SOUNDO, I*10 

3390 LOCATE PX,I:CGEN:PRINT" " 

5400 LOCATE PX,I*1:CGEN1:PRINTDF$:WAITSO 
3410 NEXT: SOUND7 , 255 

3420 LOCATE PX,16:CGEN1:PRINTDD$ 

3430 BEEP 1 の 


5440 PO-FO-1:SOUND25S5 , НЕЕ 


2450 IF РО-0 THEN 2520. 
3460 FOR 1=@ TO 6 
3470 IF BX(I)--1 THEN 3490 


3480 FK=FK-1 


5490 NEXT I:FC-2S5 
3500 GOTO 360 
3510 'GAME OVER 


3520 CGEN の 


5550 COLOR 6 
3540 LOCATE B,4:PRINT"G AM E O V E R" 


5550 TEMPO 250:PLAY"V150SD7FSGSA6F 3ASRS«* 
B7GS48BSABRSSB7GSSBSA7F7ESFSGSFSD9:V1205D 


оо 


は ば た け プ PO ソー ス ・ リ スト 


9С9Е909С9С9Е909": ' (C) カウ エサ ンス キタ ーーーー ア レニ ミト 
3560 IF SC>HS THEN HS=SC: LOCATE 10,6:РБІ 
NT"High SCORE ! !" 

3570 1= の 

3580 IF STRIG( の ) =-1 THEN JOY-01GOTO320 
3590 IF STRIG(1)=-1 THEN JOY-1:GOTO320 
3600 IF STRIG(2)=ー1 THEN JOY-2:G60T0320 
3610 I-I«1:1F I>1 の の 9 の THEN 3580 

5620 GOTO 510 , 

5650 "CLEAR" 

3640 COLOR 7:LOCATE 10,7:PRINT"SIENE";RN 
3650 LOCATE 10,5:PRINT"ROUND";RO 

3660 CGENO:COLOR 2:LOCATE12,9:PRINT"CLEA 
R''":TEMPO100 

3570 RN-RN*1:1F RN-8 THEN RO-RO*1:RN-1 
3680 PLAY"OGRZL1-«CEGZDECZ-G«GG-G*DERZCEG 
3DEC-A+CEG6S: OSL 1C565C565«C-BR3AAG3FEFGECS 
"s'(C)5-7r-M NI7 

3590 IF FT= の THEN LOCATE10, 11: COLOR 6:PR 
INT"PERFECT ! "3LOCATE11,12: РКІМТ" 1000рёѕ" 
: PLAY"O&L1CDEFCDEFCDEFGS: O6L 1FGABFGABFGA 
B+C5" 』 SC=SC+ 1 9 の 

3700 5070240 

3710 CLS4: SCREEN の , 9 Q 

3720 CGEN1:COLOR 7 

3730 LOCATE 17,2:PRINT"i 'Q1";:CGENO: PRIN 
T"!":CGENI 

5740 LOCATE 17,2: РКІМТСНАФ (54) ; "4$" 
3750 LOCATE 17,4:PRINT"22456" 

2760 LINE(120,16)-(199,71) ,PSET, 6, BF 
3770 LOCATE 16,6: РКІМТСКФ (9) :LOCATE 20,6 
: PRINTPF$ (0,0) 

3780 FOR І-й TO 32 

3790 LOCATE I,10:PRINT" ";CHR$(&H1F) 』 CHR 
$(XH1D);" " 

5800 LOCATE 1+1,10: РКІМТСКФ (І MOD 2) 
3810 LOCATE 1%5,10:РКІМТ" ";CHR$(kH1F);C 
HR$(&H1D);" " 
5820 LOCATE 1+4,10:РКІМТ PF$(1,I MOD 2) 
3830 WAIT 100: МЕХТ 

3840 LOCATE I  ,10:FRINT" 
3850 LOCATE I«42,10:PRINT" 


"+RK$+ "Ç" " 
"K" *Bk$ " " 


3860 LOCATE 14,11:CGEN1:PRINTFF$(1,0);:C 
GENO: PRINT" Ріо" 
3870 LOCATE 14,13: CGEN1: PRINTCR$ (0) ; : CGE 


NO: PRINT" Tagosaku" 

3880 LOCATE 14,15: CGGEN1:PRINTFR$(2)::CGE 
NO:PRINT" FRUIT" 

5890 LOCATE 14,17:CGEN1:PRINTPR$(1,0);:C 
GENO: PRINT" Pirakichi" 

5900 LOCATE 14,19:CGEN1:FRINTGN$; : CGENO: 
PRINT" Gonbei" 

3910 LOCATE 32,22:FRINT"B chan" G; 
3920 CGEN1:LOCATE 21,22:PRINT"'":LOCATE 
355,22: PRINT"x" 

3930 CGENO:LOCATE 52,25: РКІМТ "Кацсһап" 
5940 CGEN1:LOCATE 31,25: РКІМТ "7": CGENO 
3950 LOCATE 16,22:FRINT"Push TRIGER" 
3960 IF STRIG(Q)--1 THEN JOY-Q:GOTO4Q000 
3970 IF STRIG(1)--1 THEN JOY-1:GOTO4000 
3980 IF STRIG(2)--1 THEN JOY-2:GOTO4000 
3990 GOTO 3960 

4000 RETURN 

4010 “Y 27! !Pio 

4020 ' 
4030 
4040 
4050 
4060 


'|SPECIAL THANKS! ! 
e 
| 

| 

4070 '! 
2 

| 

| 


IDEA :Buchan サマ 
MUSIC: 727° — サマ 
T-GRAPHICS %7 
ラ ・ フ ェ ー ル リフ シャ の サマ 
が リエ サン スキ ター 93 
MUSIC PROGRAM: 
9n) コウ イチ サマ 


4080 
4090 
4100 
4110 
4120 ' IPROGRAMED by Kauchan 
4130 '! NCC-1701 
4140 ‘| dHBI-BASIC*COMPILER 
4150 71 апа Хіс... 

4160 71 1985,6,3 


4170 ' ——— 


— ya >a NUES 


BASIC- YE 


i 5 à 4 

i 2 E E 

; Ht эзе 
2 яз 

кезк S 

ж в. #8 
wr 

ps g 

254221422411 


古典 的 な パズル も , マイ コン で や れ ば 一味 
変わ っ た も の に な り ま す . と いう わけ で 
今回 は S51 で パズル ・ ゲ ー ム を 作っ て み ま 
L. FA. 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 (4000 一 46FF ) 
> — 9 (В000--СОҒҒ) 
8 

ج > >[ 


P >P 

操作 も や りや すい し , РОЖА t ` 

な か か わい くく て よく で き て いま す . 
(Ti) 


プロ グラ ム は BASIC と マシ ン 語 (4000H 


—46FFH) t デー タ (B000H —COFFH) に 
分 か れ て いま す 。 ЈА КІ, 2, 3 の 順に 入 
BLUT: チー ンジ に ネー も し で て だ ちの 

そし て , 一度 電源 を OFF し て か ら BASIC 
を ロー ド し て RUN す る と , マシ ン 語 と デ 
ー ダ を ロー ド し て か ら 実 行 し ます 。 


=PEEK(&HDOQO) 
IF AO &HCC THEN 1350 
RESTORE 1510 
READ Mi1$,M2$,Mi$ 
CLS | 
A$=CHR$ (0) +CHRS CKHFCO *CHR$ CO) 
B$=CHR$(0)+CHR$ (&HCF ) *CHR$ CO) 
C$-CHR$ (0) *CHR$ (O) *CHR$ CO) 
LINE(CO, 0)-(287, 167), PSET, 2, В 
PAINT (1,12,0$40$«*0$4C$4B$*B$4E$-4C$ 
,2 ' 
1100 LINE(96,144)-(143, 167), PSET, 7, B 
1110 PAINT (97,145), CHR$ (&HFC) +CHR$S (O) +A 
$+A$+CHR$ (O) *C$4CHR$ С &HCF)+CHR$ CO) *B$4E$ 
*CHR$ СО) «C$, 7 
1120 LINE(144, 154)—(191, 167), PSET, 7, B 
1130 PAINT (145, 145), СНЕФ(&НЕС) *CHR$ CO) + 
A$-0$-CHR$ CO) *C$-CHR$ C&HCF) +CHRS CO) *B$«*E 
$«CHR$CO)*C$,7 
1140 CIRCLE (120,1562,10,7 
1150 PAINT (120,1562,6,7 
1160 CIRCLE (168, 156), 10,7 
1170 PAINT (168, 156) 。 6,7 
1180 SYMBOL 520,8), "Ріо", 8,4,7 


が いい と 思い ます .「 や や っ ただ / 
Q OCT. そこで, BASIC ュ ン パ イラ を 使用 し て みて は どう で し ょ うか ? 
「 り に で きま す . ポケ コン の よう な 10K バ イト を 割る ショ ー ト ・ ア ド ベ ベンチャー は, せめ て DATA 部 分 だけ で も マシ ン 語 に する と 助かり ます . 


メイ ン ・ ル ー テ チン 
チェ ッ ク ・ ル ー チ ン 

キャ ラク タ 移 動 ル ー チ ン 
1 ブロ ッ ク 表 示 ル ー チ ン 
イニ シャ ライ ズ ・ ル ー チ ン 
カー ソル 移動 ルー チン 
BOX ル ルーチン 

方 向 セ ッ ト ・ ル ー テ チン 
イニ シャ ライ ズ ・ デ ー タ 


2 [4 [6|[8|с カー ソル を 動か し, 
| SPACE | で 位置 を 決め , 再び [2][4][e [sl 
で 動か す 方 向 を 決め ます . な お , 可能 な 限 
り 何 枚 で も プロ ッ ク を 動か すこ と が で きま 
3. また だ, |@| キ ー で ギブ プ ・ テ アッ プ し ます . 


BASIC で は 背景 の 表示 と ファ ン フ ァ ー 
レ を 行なっ て いて , 残り は マシ ン 語 で や っ 
て いま す .。 マシ ン 語 の 方 は 吾 に アド レス ・ 
リリ スト 1 PiIO パ ズル BASIC リ スト 


SYMBOL (324,10), "Pio", 8, 4, 2, ХОН 
1200 SYMBOL (380, 58), "NAL", 6,3,7 
1210 SYMBOL (384,60), "N° 2L", 6, 3, 1, XOR 
1220 ТІМЕФ-"О0:00:00" 

1230 EXEC &H4000 

1240 SYMBOL (400, 110), "TIME", 6, 4, 6 
1250 SYMBOL (404, 112), "TIME", 6, 4, 1, XOR 
1260 SYMBOL (400, 150), TIMES, 5, 3, 7 

1270 IF PEEKC&H4BO5)=1 THEN GOTO 1290 
1280 PLAY М1%, М2%, М5% 

1290 SYMBOL (580, 180), "TRY AGAIN?", 2, 1 
1300 SYMBOL (382, 181), "TRY AGAIN?", 2, 1 


3 
z 


1310 A$=INKEY$:IF A$="" THEN 1310 

1320 IF A$="Y" ОН А%="у" OR АФ="" OR ñ$ 
z"£" THEN 1040 

1330 CLS 

1340 END 

1350 CLEAR , &H9000 

1360 RESTORE 1440 

1370 FOR I-&HDOOO TO &HDO2E 

1380 READ A$:POKE І, УЯ ‹"&Н"+АФ 

1390 NEXT 

90 EXEC &HDOOO 


マッ プ グ を 載せ て お な お く の で , そちら を 参考 に 


LT CIS UG. 


いろ いろ な プ ブロッ ク で 閉じ 込め られ て い 
る BiO 君 を , 青い ドア か ら 脱 出る せ て や っ 
て くだ さい 

な か な か 難し く , 私 が この パズル を 初め 
て や っ だ と き は , 約 1 時 間 か か り ま し だ . 
参考 文献 | 
"S1 ン フト 技術 マニ ュ ア ル ", SP 出版 


1410 LOADM 

1420 LOADM 

1430 GOTO 1040 

1440 DATA CC, BO, FO, 10, SF, 40, 09 

1450 DATA CC,B1,F1,10, 3F, 40, 09 

1460 DATA CC,B2,F2,10, 3F, 40, 09 

1470 DATA СС, ВЗ, ЕЗ, 10, SF, 40, 09 

1480 DATA Во, РЕ, 09, Сё, Ед, 10, SF, 40, 09 
1490 DATA Ве, FE, ОЯ, Сё, Ғ5, 10, ЗЕ, 40, 09 
1500 DATA 39 

1510 DATA "V1OT1200SL16BR16RBRA4RZRZ2.O06L8 
F*R16L32F*R32L8F *. R16D+R16L く 2D+R さ 2LBD+。 R 
1605B. R1606L2C«*. " 

1520 DATA "V10T1200SL16F*R16L32F-*R32F-«4R3 
2ZL16F+TR16F+R16F+R16F+R16F+R16F+R16F+R16D 
+R16F+R16BR16 ロ 6LBD+。R16D+R16L く 2D+RSZLBD+ 
。・R160SBR16L さ 2BR さ 2LBB。R16F+。 R16L2F+. " 
1530 DATA "V10T12005L16D-*R16R8RA4R2L16D-*R 
1604BR160S5D*R16F*R16L8B.R16BR16L32BR32L8 
B. R16F+R16L さ 2F+R さ 2LBF+。 R16D*. R16L2C«. " 


> 6 月 号 p.104 の 怪人 6001 面 相 さ ん へ …BASIC で アド ベン チャ ー を 作る の は 確か に 手軽 で す が 。 入力 する 人 の こと を 考え る と , マシ ン 語 の 方 
つい に 最後 の 難関 ど 」 と 思っ た と き ,「 ピ ー」 と 悲痛 な エラ ー 音 を 出さ れ て は , 生き る 希望 6 も を なくなる と いう も 
オブ ジェ クト な ら チ ェ ッ クサ ム が と れ ま すか ら , デバ ッ グ が 確実 


ie. 


| リリ スト 2 PiO パ ズル マシ ン 語 リス ト 


40FO ВА 39 86 05 A1 62 27 OE АС A1 63 27 09 АҒ A1 62 :88 Adda +O +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B «C +D +E +F Sum 
--------------------------------------------------------- 4400 49 14 87 C9 49 10 éF C9 49 14 20 DO CE 00 OF Ab :2Е 
Sum: 7B DD 27 70 D5 99 СА E7 ЗВ BF D? 78 86 АВ 73 D2 :СС 4410 C9 49 28 26 OB 33 5F 11 83 FF FF 26 F2 7E 45 EE :58 


4420 1F 31 ағ BD 44 C9 Аё C9 49 OO A7 C9 49 O4 6F C9 :16. 
4450 49 OO 30 O4 BD 44 C9 A6 C9 49 14 87 C9 49 18 F :53 


Add +0 +1 +2 +3 +4 45 +6 +7 +8 +9 +A +B +С +D +E +F Sum 4440 C9 49 14 20 DO CE 00 02 A6 C9 49 28 26 12 33 44 175 
4100 27 04 Яі 63 26 OA 86 FF A7 65 39 86 01 A7 65 39 :F5 4450 11 83 00 14 25 F2 27 05 33 СВ EB 20 EB 7E 45 EE :8D 
4110 86 63 4A Có 04 3D EB 62 SA IF ОЗ Aó C9 49 14 27 :16 ` 4460 1F 31 АҒ BD 44 C9 A6 C9 49 ОО A7 C9 49 01 6F C9 :13 


чзизалк ааа NUES 


P.S. すり へ っ た ネジ に つい て で す が , オイ ル や 瞬間 接着 剤 を 使っ て みて は ? 


ーーーーーーーーー ニ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー “- 


2412, 


| リリ スト 3 PiIO パ ズル 


FF 81 FF 
CO 7F FF 


マシ ン 語 デー タ ・ リ スト 


を も 一 や っ て いら れ ま し ォ ー ん . 僕 の 友だち が, ある 日 葉書 を 1 枚 く れ 一 , と 頼む も ん だ か ら , 1 枚 葉書 を や り ま し た .「 な ん に する ん だ 一 」 
と 聞く と , な ん か の 本 の プレ ゼン ト に 送る と か 言っ て まし た が それ が な ん と 当たっ て し まっ た だ ん で す . 僕 な ん か まだ 一 度 も 当たっ て な い の 


に 一 。、 バカ ヤロー と 言い だ く な っ ちまい ます 。. 


(Racer) 


リス ト 3 ヨ 3 PiO パ ズル 


Bu-uWESSMKIUHTTMEERZ34A7T(»Z/ 
大 好評 TIM 特製 ジ ョ イス ティ ッ ク 


@PC-8801 用 \13.200 
@PC-6001 用 \ 9.200 
普及 型 ¥ 7,800 


T ex-1R (EE АХ); Ot200 
eMSXH (^ (¿>= OK) X 9,200 
限定 大 処分 市 X POBBI - "BA KDL 00 - O03 OKT 
普及 型 は 多少 改造 要 で す (説明 書 人 
@ チ ャ ン ビ ピオ ン ベ ペー ス ボ ー ぼ \ 28,000 жығы " "ed 
ARNT , e 遂 に 登場 BBSMKII(SR) 用 ジョ イス ティ ッ ク \13.000 


ニー ーー Ус 729,000 | わずらわし い 切 換 ス イッ チ な ど あ り ま せん 。 
N — €7v703—27— -X25000 | ex. xus 


。 @ ク レイ ジー コン グ …\25,000 | eec-8801 (MKII) -24568 ス ペー ス 、Z.X、RETURN 
= ンー Me 
(送料 別途 ) | ジ ヨ イ ステ イツ 
I 
君 の 部 屋 の イ ン テ リ ア に 最高 | 1P 側 だ け 特別 価格 7800 円 ・ 送 料 1.000 円 


ピン ポー ル マ シ ン ( 動 品 ) e1P+2P 側 特別 価格 15.600 円 ・ 送 料 サ ービス で す 。 
全品 一 律 3 万 円 (送料 別途 取り 付け 説明 書 、 線 材 一 式 付 。 誰 で も か ん た ん に で き 
@ ジ ャ ックス オー プン @ ア ラジ ー ン キャ ッ ス ル ます 許し く は TEL じ で 下さ い 。 | 

る グラ ンド スラ ム @ ビ ピッグ ショ ッ ト 他 広告 有効 期限 Pi 〇 次号 発売 日 迄 


コン ピュ ー タ ー& ビ デオ ゲー ム 
ر‎ рт i | 2 


р こ に ガ ぐ 人 至急 、60 円 切 ま x3 枚 を 封 商 に 入れ て 


在庫 価格 表 を お 申し 込み 下さ い 。 


* ご 注文 は 住所 ・ 氏 名 ・ 電 話 番号 ・ 商 品名 記入 の 上 、 現 金 書 留 で 。 ティ ティ エム 
お 買上 げ 10.000 円 以上 送料 無料 (但し 、 ピ ン ボ ー ル マシ ン 、 テ ー ブ ル ゲー ム は 除く ) 10.000 円 未満 は 送料 全国 均一 1.000 円 


T760 4121825873 7 88-12 
2 (0878) 33-8526 ^ 
= АМ9:00--РМ7:00 
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РО 君 は と っ て も 気 が 弱 くっ て , вО < 
せ に な ぜ か ミミ ズ 器 が 大 の 嫌い . 

ある 日 PiO 君 は 散歩 へ 出かけ まし た . だ 
けど , どこ で どう 間違っ た の か 道 に 迷っ て 
し まい まし た . PiO 君 が 困っ て と ぼ と いぼ 歩 
いて いる と , 前 方 に 古い お 城 が ある の に 気 
が 付き まし た . 辺り も だ いぶ 暗く な っ て き 
7-0) C (PiO3R (3: & Bl # OD C, 夜 に な る と な 
ー ん も 見 えん ), 今晩 は この お 城 に 泊まる こ 
と に し よう と PiO 者 は 決め まし た . 

そこ で PiO 君 が そ の お 城 の 中 に 入っ て 行 
(desc 
一 プロ グラ ム ・ イ ン フ ォ メ ーション 

ППТ” マシ ン 語 0D00—35FF 
スタ ー ト 


と っ て も 面白 い ゲ ー ム で す が , 1 面 
目 か ら 難 し すぎ ます . 最初 の 面 ぐ ら 
ішегі ¿Ç L С (УӘ, (м) 


ォ ー ル ・ マ シン 語 な の で , 快 人 氏 の モニ 
タ な ど で 間 違い の な いよ うに 入力 し て くだ 
る きい. マシ ン 語 は $0D00 一 $35FF ま で と 結 
構 長い で す が , 
入力 し 終わ っ だら, 後 で 泣き を 見 な いよ う 
е а зА РР А 


プログ ラム を ロー ド し て か ら A=USR 
($1A00) を 実行 し て くだ さい . する と キ 
ーー 操作 を 聞い て くる の で , 1 文字 入力 
[RETURN | と し て キー 操作 を 設定 し て くだ 
さい (| RUBOUT | で 修正 可 )、 キー 操作 を 
設定 し 終わ る と シン プル な タイ トル を 表示 
し ます . ここ で | RETURN | を 押す と ゲー 
ム が スタ ダー ト し ます . 

プレ イヤ ー で ある あな だ は, この ゲー ム 
の 主人 公 で ある PiO 君 を 操り , 嫌い な ミミ 
ズ 君 や ガイ コッ 君 に 触れ な いよ うに カギ を 
拾っ て , 無事 PiO 君 を 迷路 の よう に な っ て 


頑張 っ て 入力 し て くだ きい. 


っ て 則っ て いま し た 。 


アド レス ・ マ ッ プ 


仮想 スク リー ン 2 (サー チラ イト 用 ) 
PASS WORD DATA 

仮想 スク リー ン 2 部 分 クリ ア 
仮想 スク リー ン 2 に 表示 内 容 を 部 
分 転送 

敵 ワ ー ク 

PRINT DATA 

STOP KEY 

サー チラ イト 処理 

ワー ク ・ ク リア & ゲ ー ム ・ パ ター 
>, 瑞 移 動 パ ター ン 読 み 込み 
迷路 DATA を 仮想 スク リー ン 1 に 
転送 

宝石 , ガイ コツ な どの DATA を 仮 
想 ス クリ ー ン 1 に 転送 

区 を 仮想 スク リー ン 1 アド レス に 
変換 

仮想 スク リー ン を V-RAM へ 転送 
KEY 入力 

キャ ラク タ DATA32 バ イト を PCG 
へ 転送 

PiO キ ャ ラク タ DATA 
PiO& 敵 を 消す (仮想 スク リー ン 1 
上 ) 

PiO& 敵 を 表示 (仮想 スク リー ン 1 
kJ 

キャ ラク タ 表 示 ( 仮 想 ス クリ ー ン 
1.4) 

PiO 移 動 SUB 

キャ ラク タ 消 す ( 仮 想 ス クリ ー ン 
ҺЕ) 

キャ ラク タ の 下 の 背 景 DATA 読 み 
込み (仮想 スク リー ン 1 上 ) 
瑞 移 動 MAIN 

敵 移動 パタ ー ン アド レス DATA 


TIME 表 示 & 敵 移動 
HIGH&SCORE 表 示 
SCENE 十 1 &SCENE 表 示 
MUSIC ルー チン 

音階 DATA 

MUSIC(B) 


БО оН s LSU, 


PiO 君 は ミミ ズ や ガイ コッ ツ 君 に 触れ る と 気 


絶 し て し まい ます (な ん せ 気 が 弱い …).PiO 


君 が 5 回 気絶 する と ゲー ム ・ オ ー バ ー で 
T. 

TIME が 0 に な っ て も PiO 君 は な ん と 
も あり ませ ん が , は っ は っ は … ま ず 助 か ら 


な いで し ょ う . 再 ス ター ト は | RETURN | 
を どーぞ. 最後 の 面 ま で 行き て 一 一 とい 


うぅ 方 は | SPACE | キー を どー を . 
^^ 


こと に よっ て 。 好き な 面 か ら ゲ ー ム を スタ ー 
ト る せる こと が で きま す 。 フ パス ワー ド を 入 


PiO 気 絶 か or 敵 を 捕え た か ? 
Ri # + 5 2 У DATA 


PiOLEFT — 1 &PiOLEFT 表 示 
ゲー ム ・ パ ター ン 

壁 キ ャ ラク タ DATA 

PiO 気 絶 

気絶 PiO キ ャ ラク タ DATA 


| MUSIC DATA 
効果 音 DATA 
敵 移動 パタ ー ン 1 一 16 


力 す る に は , タイ トル また は ゲー ム ・ オ ー 
バー 表示 中 に |1 | を 押す こと に よっ て フ パ ス 
ワー ド 才 入力 す る こも が で きま す 。 

パス ワー ド は 4 文字 で , [RUBOUT | で 修 


正す る こと が で きま す .。 フン パ スワ ー ド を 入力 
し た ら 6[|RETURN | を 押し て くだ さい . + 


2 面目 は この 後 真 っ 暗 に な り ま す 
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と ある 日 の こと で す . 私 の 学校 は 全寮 制 で , 8 : 30 か ら 朝 の H・R が あり ます . その 日 の 朝 は , 前 々 日 徹夜 し た こと も あり , 点呼 も ぶっ ちぎ 
t, 友人 に 起こ され, 時 計 を 見 る と 8 : 27 だ っ た だ. ま だ, 着替え て も な いし , 時 間 割 り も 合わ せ て いな い . 私 は あせ っ 
て 学校 に 全力 疾走 し まし た . が , その 日 は 朝礼 が あり , 遅刻 は な か っ た も の の 突然 の 全力 疾走 で .「 ヒ モンケ ツ 」 で ぶっ 倒れ て し まい まし だ た とき. 


(こん な 自分 を 情け な く 思 う , ХАЖ) 


219) 


5%, その パス ワー ド の 面 数 を 表示 する の 


で , [に <|[>| で 面 数 を 上 下さ せ て 好き な 面 数 


に し て | RETURN | を 押し て くだ さい . 2 
の 面 か ら ゲ ー ム が スタ ー ト し ます . 

な お パス ワー ド を 見 だ いと き は , ゲー ム ・ オ ー 
バー 表示 中 に [2| を 押す と クリ ア し た 面 ま 
で の パス ワー ド を 見 る こと が で きま す (>\ 
スワ ー ド は 4 面 き に あり ます ). 


< 
プロ グラ ム に 
つい て 

・ マ ッ グ を 載せ て お なき ます. こ 
の アド レス ・ マ ッ プ を 見 て わか る よう に :, 
この プロ グラ ム で は 16K バ イト の ほとん ど 
を 使っ て いま す . 

プロ グラ ム の 特長 は , スタ ッ ク ・ ポ イン 
タ と ダイ レク ト 命 令 を フル に 活用 し て いる 
こと で す .。 これ を 活用 する と , プ ブロッ ク 転 
送 な ん か は 普通 の や り 方 の 半分 以下 の サイ 
クル で 実行 きせ る こと が で きま す . みな る 
ん も 大 い に 活 用 し まし ょ 2 う . 

プロ グラ ム の テク ニッ ク し と し て , キャ ラ 
クタ を ちら つか せな いな だ め に キャ ラク タ 々 タ の 
移動 は すべ て 仮想 スク リー ン 上 で 行なわ せ , 
それ を V-RAM に 転送 する と いう 方 法 を 採 


ЭТАУМӘЭТ, га?ы キャ ラク 次 に よっ CC 


背景 が 壊 る きれ な いよ うに , MATLAB 
を 行なっ て キャ ラク タ を 移動 きせ て いま す . 

それ か ら , 迷路 の デー タ は 1 ブロ ッ ク (2 
X2 キ ャ ラ ) を ビッ トド ト に 割り 付け て , デー タ 
の 圧縮 を 行なっ て いま す ( な ん せ JR-100 は 
16K パ イト し か な いも ん で …)。 こ うす る 
L, 4 画面 分 の 迷路 の デー タ も だ っ だ の 62 
АЕ К лав ЕЗ И 

その他 に も , この ゲー ム の た だ た だめ の 
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MUSICov—3-v(6*3272—70B$si EHF 
こと が で きる ) や 。 10 進 出 カ ルー チン な ど , 
自分 と し て は か な り の テク ニッ ク を 使っ だ 


э% т, 


プロ グラ ム 


С ж № 

“この ゲー ム は 俺 に は の ろ す ぎる ぜ グ "と 
いう ニュ ー タ イプ の 方 は ,。 ブログ ラム を ロー 
FL T, POKESOF87,0:POKESOF96,0 
を 実行 し て か ら , A-USR(SIAOO) を 9: 


"utet を だ きい 


> 
ゲー ム 中 に | 一 | を 押す と ゲー ム を 一 時 ス 
トッ プ き せる こと が で きま す . 再 ス ター ト 


は も う 一 度 | 一 | を 押し て くだ さい . 


実 を いう と , この ブログ ラム は 私 が 作っ 
Mr.PiO マシ ン 語 リス ト 


GO: OO 
Có: 62 
2B:70 
61:B2 


だ 初め て の ゲー ム な ん で す .。 プロ グラ ム は 
使い を うな ルー チン ヵ 6 先 に 作っ て いっ た 


OC, メイ ン が 中 程 に どき て し まい まし だ た 。 


この ゲー ム は マシ ン 語 で どれ だ け プ ログ 
ラム を 組む こと が で "きる か と いう 。,。 力試し 
の だ め に 作っ だ も の な の で , BASIC を 使 
うと 簡単 に どき る よう な 部 分 で も ,。 あえ て 
マシ ン 語 を 使っ て プロ グラ ム を 組み まし だ ただ. 
その だ た だめ, ゲー ム 中 は 一 切 BREAK が 効き 
ETÀ. 

この ブロ グラ ム は 昨年 の 11 月 ご ろか ら 作 り 
始め て , 1 月 の 中 ご ろ に は ほとん どど でき あ が 
っ だ の で す が , ずる ずる と いろ いろ 付け 加 
えん だ り 、 改良 し て いっ た の で 。 ЯЛАН 
と か か の で も まい まし だ ほん も 。 E 
や モン ゲル は か の いい | Т, ят” 
ラ を 作っ た (オー ル ・ マ シン 語 。, 2 パス ) の で , 
プロ グラ ム を 作る の が ほん と 楽に な り ま し 
た | 

この ゲー ム は 面 数 が 全部 で 25 面 あり ます 
Dî, すべ て の 面 を クリ ア す る の は か な り 5 大 
変 で し ょ う . な ん せ , 敵 の 移動 の 思考 ルー 
チン は 16 パ ター ン も あり , 各 面 と も 移動 パ 
ター ン が 違い , 項 の 一 匹 一 匹 も すべ で て 違っ 
だ 動き を し ます か ら …. 
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eF8o СЕ 56 ӨӨ FF 11 1A СЕ 19:0С ||------------------------------- 
OFBB 01 FF 19 F1 96 СВ 81 7F:68 || SUM: ЗЕ 48 1D ZA 79 29 44 34:F7 
の F9 の 9 27 ӨЗ 7E 11 00 CE OB 01:93 
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ВЯЛО ТС, S1 ユー ザー で す . いや ぁ ーS 1 は 使い や すい で す ネ ェ ー, 最高 で す . 僕 は 友人 に S 1 ユー ザー が 3 人 も いる の で , 情報 交換 や 
プロ グラ ム 交 換 な ど を し て いま す . ハン ド ・ ア セン ブル は 疲れ る な あー と 思っ て いた だ たら, 1/O の 7 月 号 に ほう と う ア セン プラ が 出 ま し た ね . 

ヤッ ホー. と ころ で この 前 , 漢字 DISK-BASIC と 拡張 RAM を 買い まし た . 漢字 DISK-BASIC で テキ スト ・ ア ド ベ ンチ ャ ー を 作っ て いま す . 
‚ また 普通 の BASIC で も BASIC キマ シン 語 の アド ベン チャ ー を 作っ て いま す . で きた だら PiO に 出 を うと 思っ て いま す ( で も 中 3 だ か ら 受 験 で 作 
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; ゆき や は みゆ ざき と ひろ こ . それ か ら イ メー ジ ・ レ コー ド の 類 が 多い みた いで すね . “CHILDHOODS END” みな る ん 買い ましょ う ね . TM 
^ £ е NET WORK だ ょ . "RAINBOW RAINBOW" も まあ まあ で す . 菓子 子 さ ん お 手紙 ゆき や に くだ さる っ だ そう で … お 手数 か け て すみ ませ ん 
cu (2 箇月 も お な くれ て アン ケー ト の 答え ぇ 出し て 手紙 まで も ら っ て …). し か し 2 箇月 た っ て か ら ハ ガキ が 載る と いう の . も 考え も ん で すね . 
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C) (O) ° (O) 私 が プロ グラ ミン グ や 絵かき を する と きか ける 曲 ( テ ー) は “TM NETWORK LIVE” t "BRAIN OF BALANCE" が メイ ン で す . 
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PiOPiO な ん か 締切 毎月 15 日 と いう 風 に どき た らい い の で す が …. Cb XERPIOORU I u: O Z ACT b'IP|S A. 


お 使い で すか ? 


Ch. ら ぼ る ん 菓子 子 き さん, せ ー や る ん も 頑張 っ て くだ さい ! 
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33B8 
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55С8 
55ро 
55р8 


追伸 峰 ゆ きよ る ん は 何 を 


FM それ と も P6 で すか . それ と 「 深 音 」 も 「 み ね 」 と 読む ん で すか ? や っ ぱり …。 これ か ら も イラ スト 頑張 っ て くだ さる 


ダー 眠い , 肌 が あれ る . ふけ る の は いや よー…. 


(な る み ・ 火 金 の 朝 が と 一 て も つら い ・ あ お い は 新 顔 ) 
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ч イラ スト 、 イラ スト 、 初 め て 投稿 し ます 。 動物 の 1 スト を 


ФР Б 
り ま す 。 な ん と いっ て も 動物 達 が 
大 好き を ん で …… асы 
な どき よく か きま す が 、 そ う で すね 、 
次 回 は & き かき ましょ うか ね の 
(まん じゃ あ 、 DELTI 
[5$] イコ ン も 好き だ けど 、 動物 と 
NASCE DIA Е と いう 人 い 
まし た 人 POPIO で お は な し し 
жаз! (ラフ ェ ー ル 伯爵 ) 
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MZ.-700/1200 用 スコ ア 表 示 サ ブル ー チ ン 


が 表示 きれ ます . Mohn, 


77417174 
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マシ ン 語 で の スコ ア 表示 は な か な か ヵ か: や っ か な お ぉ 表示 で きる スコ ア の 画面 に は “12346912" 


いな も の で す . 特に 16 進 数 を 10 進 数 に 直す 
の が 困難 で , スコ ア の 表示 だ け を BASIC 
で 行なっ て いる プロ グラ ム も ある よう で す 。 
そこ で , 今回 は Z80CPU の DAA 命 令 を 用 
ぃ た だ 簡単 な サ グ プル ー チ ン を 紹介 し ます . 
Ве? X DerXXILILCPCO X. Y 
座標 を 16 進 数 で , 加算 し た ない スコ ア を BC 
レジ スタ に 2 進化 10 進 数 モッ ト UL, B 
000H 番 地 を コー ル す る と , 画面 に スコ ア 
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SOURCE STATEMENTS 4 


PRINT SCORE 20 


桁 数 は 8 桁 で す . 

Са, 実際 に 例 を 示し ます . C00 H Æ 
地 か ら 順に 78, 56, 34, 12(16 進 数 で す ) と 
書き 込ん で きま す . E D レ ジス タダ に を 
れ ぞ れ 20, 10(10 進 数 どす), BC レジ スタ 
に 1234H(16 進 数 で す ) と 書き 込み , B000H 
番地 を コー ル し ます . する と 12345678 十 
1234—12346912 が 実行 され, CO000H 番 地 
か ら 順に 12, 69, 34, 12(16 進 数 で す ) ЕЖ 

スコ ア 表 示 サ ブル ー テ チン 
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18 BO1O 
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A. 
この プロ グラ ム は リロ ケー タル で す の 
Т, どこ の アド レス に で も 首 け まず Et 
簡単 に 桁 数 を 増やす こと も で きま す . プロ 
ラム は 単純 な の で すぐ 解析 で きる で し ょ 


(SCORE*1),4A 
А, (SCURE+2 ) 
8,0 


SCORE -*3) 


Н,А 
(SCURE+2 ) 。 HL 
(DSPXY ) 。 DE 
PRTHL 

HL, (SCORE) 
PRTHL 


> 7 月 号 p.30 の 「 矢 野 将 樹 」 さ ん , お 豆腐 を パカ に する の は いけ ませ ん よ . そん な こと を する と 豆腐 屋 の 息子 の TAROT が 許し ませ ん よ . 5 
な み に 水 点 下 30 度 ほど に 冷や せ ば 豆腐 の 角 で 人 は 殺せ ます よ ( あ くま て 冗談 で す . 実行 し な いよ うに )。: PiOPiO で 音楽 の こと が いろ いろ い 
b われ て いま す が 。 私 は VGM( ビ デオ ・ ゲ ー ム ・ ミ ュー ジッ ク グ ) も サン トラ で す ( 吉 に です か?) (TAROT CARDS) 


まず 前 回 の “スタート リッ プ " で の 礼 を 
いわ ね ば な る まい . 私 こと プラ イク は , 5 
の と き の 瑞 基地 発見 と , タ イム スポ ッ ト の 謎 
を 解明 し た 功 に よっ て 大 佐 に 昇進 し た . 
さて 今回 の 私 の 任務 は , 連邦 の 誇る 重 戦 
闘 機 ド ラ ソ ム の パワ ー ア ッ プ ・ バ パー ジョン 


で ある スー パー ドラ ソム の 実戦 試験 で ある . 


場所 は 現在 最大 の 激戦 区 で ある R-57 惑 
星 に 決ま っ た . この 星 は ケン タウ ロス の 24 
地区 の ガン マ ・ ハ イド ラ に ある . また 燃 量 
な どの 問題 か ら , スー パー ドラ ソム の 飛行 
可能 距離 は 1 一 20 区 画 ま で で , これ は ラウ 


この ゲー ム は プロ グラ ム 1, ブロ グラ ム 2。 
гель デー 提 デー まろ) GEN E 
ディ タ の 計 7 本 で 構成 され て いる の で , 上 
記 の 順に 迫力 よー ダダ ゲ に セー ラテ UCT 


ou. 


プロ グラ ム 1 を ロー ド し RUN する と , 順に 
オペ ーッ プロ ルカ あま て や ロー ド し ます 。 
する と タイ トル が 上 か ら ス クロ ー ル し て < 
る ので) етті АХ (7750, ゲー 
ム が 始ま り ま す . 

カー ソル ・ キ ー ゼ で 移動 , 左 の | SHIFT | 
キー で ビー ム 発 射 で す . 

まだ この ゲー ム に は 2 種類 の キャ ラク タ 
(空中 用 4 つと 地上 用 3 つ ) が あり , 両者 の 見 
分 け 方 は 次 の 通り で す . 

地上 用 の キャ ラク タ は, 
の 常に 1 つ し か 出 て こない 
@ 形 が 変わ ら な い 
スク ロー ル 画 面 に シン クロ し て いる 
と いう 3 つの 特徴 が あり ます . 

それ に 対し て 空中 用 の キャ ラク タ は , 
で 形 が クル クル と 変わ っ て いる 
の 最大 で 5 つ 出 て くる 
9 画面 と シン クロ し て いな い 
КЕТТ 
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テテ ニス スエ エズ エエ エエ エモ テ エモ テテ 


で は , 今回 も 私 の 良き パー トナ ー と し て 
と も に 戦っ て くれ . 


画 プ ログ ラム ・ イ インフォメーション 


— サウ ンド , スピ ー ド と も に 最高 ノ こ 
B 評 | れ だ け で て でき て いれ ば いう こと な し . 


ам ом 


で き あ が っ た デー タ は , 

VSAVE "ファ イル 名 "V-RAM ス ター ト ・ ア ド 
レス ,V-RAM の エン ド ・ ア ドレ ス と し て セー プ ブ 
し て くだ さい . 次 か ら は プロ グラ ム 1, 2 を そ 
れ ぞ れ ロ ー ド , RUN し た 後 , デー タ 1, 2, 

3 の か わり に この デー タ を ロー ド し , メイ ン ・ 
プロ グラ ム を CHAIN し て 〈 く だ さい . 


iT, 空中 用 キャ ラク タ の 場合 , [Z| キー 
で 画面 の “>” を UP の 位置 に モッ ト し て 
ビー ム を 発射 し ます 。 まだ 地上 用 キャ ラク 


タ の 場合 , [| キー で 画面 の ">" を 


DOWN の 位置 に モッ ト し て ビー ム を 発射 
LET, 

英 は 絶え ず 2 発 (重なっ て 1 発 に 見 える と 
きも ある ) の 弾 を ゲ レ イ ヤー めがけ て 撃っ 
て きま す が , これ は 6 一 ROUND+4 の 式 に 
従っ て 弾 速 を 決め て いる の で , 面 が 進む 
ほど 速く な り ま す . 


デー タ 3 の 替わり に 自分 で 作っ だ た だ ッ \ タ ー ン 
ехе) に 落とす ブログ ラム で す . 
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ACTION GAME 
S OF 


gEpGlHOTLC 


マシ ン 語 書き 込み 

キャ ラク タ ・ セ ッ ト 

ASCII コ ー ド 0--31 を 線 に 

n ー ド 32 一 255 を リバ ー ス の 線 


画面 メイ ク 
ASCII コー F91—2550 € & "0" 


スク ロー ル 用 パタ ー ン ・ デ ー タ 
スク ロー ル 用 デー タ を メモ リ に 書き 
込む 


スク ロー ル 
a 


上 記 デ ー タ の 書き 込み 
次 の プロ グラ ム を ロー ド 


初期 設定 1 
DA$ の 小文字 を リバ ー ス の 
大 文字 に し て 表示 

ハイ ・ ス コア & ネ ー ム 表示 
スコ ア 表 示 

ミサ イル 発射 高度 イン ジ ケ 
ー タ 表示 

ラウ ンド 表示 & ギ プア ッ プ 
判定 


シッ プ の 数 表示 

ギ プ ア ッ プ 処理 

ゲー ム ・ オ ー バ ー 

メイ ン ・ ル ー チ ン へ 飛ぶ 前 
の 処理 


1000--1110 
1120--1180 


11901210 
12201230 
12401270 


12801320 


1330-1350 
1360--1430 
1440--1550 
1560--1740 


1750—1870 | メイ ン ・ ル ー チ ン 
スク ロー ル 処 理 
敵 ル ー チ ン を コー ル し て メ 
イン に 戻る 
地上 の 敵 処理 . 

ミサ イル 処理 
空中 の 敵 処理 

空中 の 敵 ミサ イル 発射 処理 
自分 爆発 

空中 の 敵 に ミサ イル が 当 た 
っ た か 

地上 の 敵 に ミサ イル が 当 た 
っ た か 

S C 


スプ ライ ト 4 ~8 に 変数 
SET の 数 値 を 代入 
2740—2750 | キー バッ ファ を クリ ア 
2760—2780 | 爆発 音 

まず エディ タ を 使う 前 に あら か じ め フ パタ 


ー ン を 5mm 方 上 限 な ど に 書い て お な く 〈 と 便利 で 


1920— 1970 
1980-2030 
2040--2180 
2190— 2230 
2240--2380 
2390-2520 


2530-2570 
25802710 


2720-2730 
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《 く ださい. 入力 の 方 向 を 示し て いま す . 
エディ タダ を RUN する ょ と 。 ТЕмхЕЖҮПН 
いて くる の で 書き 込み だい 番地 を 入力 ( 錠 
0000—&2000€£ C) し て くだ る きい. 画面 中 
めまぐるしく 点滅 し て いる の が カー ソル で, 


5T 


逃げ 回 る だ け で 一 苦労 


11111111 
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カー ソル ・ キ ー で 上 下 左右 に 動き ます . 2 
ош, [Z| キー で 点 を 打ち , |X| キ ー で 点 を 
消し ます . 上 の 列 が 左 , TOP 23:04» 
イト を 示し て いま す . 一 列 入力 し た ら 6[c| 
キー で メモ リ に 落と し て くだ さい. 7 Kv 
ス を 自動 的 に カウ ント し て 次 の 入力 待ち に 
な り ま す . 
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内 容 に つい て は , プロ グラ ム ・ マ ッ グ を 
NETUS な さて は 少し 上 生 し だ も と さる 
ろ を ビ ピック ・ ア ッ グ し て 説明 し ます . 

1: 画面 デー タ 

画面 ゲー タ は 8K バ イト と 非常 に 長く 〈, 
メイ ン ・ メ モリ に 入り きら な か っ だ の で V 
“RAMO TILLY! TEAME ШУ “Ж 
て マシ ン 語 プロ グラ ム ( デ ー タ 読み 出し 用 ) 
を 作り , 高速 で デー タ を 取り 出せ る よう に 
7 し だ 、 

2: ス クロ ー ル 

スク ロー ル は キャ ラク タ ・ ジ ェ ネ レー タ 
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を 使っ て , ドッ ト 単 位 ど スク ロー ル で きる 
よう に し まし だ . マシ ン 語 を 使っ て いる の 
で 高速 に 数 百 バ イト の デー タ を 動か せま す . 


そこ で ASCII コ ユー ド 91 か ら 6251 ま で の キャ 
ラク タ を スク ロー ル さ せま し た . 両側 の 枠 


は , その 中 の キャ ラク タ (oqsuwy の 6 個 ) を 
使っ て 作り まし だ た だ. 
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ハイ ・ ス コア を 10,000 点 と 高く し だ の は , 
ネー ム 入 力 時 に 必ず 小娘 字 を 使わ な く て は 
ЫТ; 問 申 える と ヒサ ン な こと に な る か 
GTF., 

今回 は バグ 入り の スー パー ドラ ソム を 最 
初 に 送っ て し まい , 気付 いた の も 遅かっ た 
の で ずい ぶん と 無駄 な 時 間 を 費やし て し ま 
g し だ 。 

次 回 は 2 人 で 遊べ る 撃ち 合い に の ゲー ム を 


作っ だ た ので, それ を 発表 し た いし と 思い ます 。 


地上 の 英 の 方 が 楽 な は ず だ が 
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next 
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19 BV T.HIRAGIMOTO":COs5':920 
$52 

291 DH ま ="SHED M.S IS A 5000 P 

ERSONAL COMPUTER": С0=6: 90159 $5 


РА 
to 


2928 CDH ま ="THE GAME ОҒ 'SPUEPR D 
RASIM’ HAS R LOT OF CHARACTERS" 
:0028:30t0 $52 

2930 DA$s"PLERSE HIT ану КЕМ ! 
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if ЯФ= "ХХ" then oto を TY 
if A$="232" then Joto 2070 
if R#="*" then upoke 40,8 
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1802 data Ha5 ア ea さ は 65 ロロ ロロ 
1885: data Йй #заї3с5е+#9998й 
18804 data 0й8Ь248458а499980 
1445 data йй #6 20812599939 
18086 data Oaagagaagaaaaasnan 
188? data üB0cZefbó6fbelb?ce 
18808 data ЙӣсЗее561Ь31+#7се 
180802 data OB0fbDfíbetbetiftz23e 
1818 data #йӣсьЬйе22с3581 #740 + 
181! data O80fbüfbetbelb?df 
1212 data agaaaaaaanaaaoangaa 
1813 data aaaaaaaaaaaaaaaa 
1814 data Baaaogaagaaaanaaaan 
1815 data д6д4ібаь?а3я454594 
1016 data 075 +#71#65 +559599 
1817 data O?7ce?db6ce?d3329 
1818 data 060+65+#61 #609709 
1019 data 8B6dft?df?dtf45f?df 
a data 8aagaganagaanaoaaoo 
1 data amagamaaaaaangana 
22 data ЙЙЙЙЙЙЙЙЙЙйЙййййй 
23 data 1с449945еәбсязайй 
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data З@ЙЙЙЙЙ?+9+#+##еййй 
data らら ロロ ロコ + 所 
data ,ейййййї3З31+#+++4+#+й0 
data ftc8ganannais3ittétfenrna 
data t*eaadBaictttfteanra 
data *tünag8ieiff*enta 
data ##ЙЙЙЯЗ #30 # ей ға 
data ##5ййӣ? 80 ей яй 
data #+#3009+##с9 {ей EA 
data *tcüBifttcarteasa 
data + よこ ロミ ラロ te 
data *tftt87tt8Bnaaantca 
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data f*Saarrcaaaaasca 
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c37t39cftt861bs5c 
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data tt88083eaananteno 
dat; fraa?caaaaazcan 
data ftt*8Baürcaangaao?32080 
data ttaaitcaaaaaraaa 
data + ロロ ロラ イロ ロロ ロロ ed 
data fe アロ dieddd 
data ї#сӣӣї + #500091 егайй 
data #0091 ###000012ӣ00 
data еййіітеййййіеййй 
data eüa07ftfcaagaatenan 
data eBaTfKrBapnaateaan 
data caazsrsSaaanatleaan 
data caairtsSagaazrann 
data сді {+300909035000 
data eBaircaaaagazroaa 
data %йй3Ға4ій2еіі4ісй 
data caar*dise2ff£tffcü 
data こ 四 1 すす 中 に に ダイ キイ イイ 
data сйї+#+#40Й782+####{#е 
data taüaBn?7*dft£tftfteedb6ó&c6& 
data tcafftcaü48Bedb6de 
data teiftfteB42D0edb5de 
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дайайатсйатсйййй 
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аййайайайайаййайй 
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1827 data 3e3899t3e6ct80u0a0 
1028 data aagaaapnaagaaaaane 
1029 data agaaga3e2saaaaanan 
1030 data Baognaaa223808080880680 
1821 data AS アア cd ロロ 
1832 data ロロ ZS 
1833 data Büocanoaazaecaaaaaa 
1824 data üaGaGgaaagaaaaaaaoaa 
i825 data agaaanaaaogagaaagna 
18356 data 006048 #3ебсі9ійа 
data 2й06йЙе195770495йй0 
ай?сЯ995й7с%9Ұйй 
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data 01Я4541%45%0126600 
data 01+#+##1#5#0320700 
data 91#+#+1+#5#0720600 
data B1fff1?735p82266808 
data B1f3f13330726688 
data 01е1+#19270+#26600 
data Blet!fticaárar2668080 
data 01е1+#1е1+#07204009 
data й1е14145%й072070й 
data й1е1+#1+##+#0526600 
data й1+#5#1###0526600 
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ЕЙІНҒЕЙРЕЗ?ес1Зй 
#800 ЖЕЗ? ісісіз8 
fonurtfttc3fcftcilta 
eBa3tttS83tdfcifc 
eüB0ittítcif9fcifc 
ЕӘЙІРЕЕЗ1Йісія8 
#809 ####ей60#с1 #8 
fcü?ttftt8angicica 
#8@##+#+4+48#й1с1сй 
| ғәйтіғіғсаййаййй 
| 43 に 思う ff ロロ ddd 
fe ロア に ロロ 8 
| écatceééeeée£enaaaan 
| ғждғғғғғғғдйавйай 
| ieüftté£t£oanncana 
| {еЙЙЙТ # + #с7 {едӣй 
deügaittt£c7ééeta 
11: ccaaastrra?7tcal18 
I cagaaztéttego?7£caas 
アイ イ 3 イ イイ アイ f こ さこ 
Bdacaatrcoa?7*t37e 
B4ainaü?7tcaBüzfc?e 
Bgi1iftcao?7tsSoazZfc3c 
#1+#с0097 +#809000с13 
aitcag?7eaaaaataa 
діғсайғғаййайғзй 


1161 data a?7ttrtaünrer«amaaagagn 
1162! SCREEM 3 - 

1163 data #гі #090 # {009000089 
1164 data Bü?ft*aaitcaaeaana 
1165 data cr ftagarraapanan 
166 data e?ttüBa7t£raagaaan 
167 data ft イイ イア よこ ロロ ロロ ロロ 
data +##++#+4+485++@00йййй 
data е?#+##+857++ЙЙЙЙЙФ@ 
data c?ttt£Biftf£tftfBünaa 
data 07 ##9001 {< #е000ӣ9 
data ロロ アロ ロロ f+ ロロ 
data 0г+# #00009 + ##+#+#80а 
data ЙГ {#090007 ++ # сда 
data 07 # #090007 + # + #80а 
data 07 #090007 ЗЕ #800 
data ü?7fttcaBazeette2n 
data Bifftana?s«**tfenna 
data Bifttfüan?ttétfteaB 
data Biftrt*aaa?seettaa 
data 01 ## #350000 ++ # #80 
data 01 ###78000+####сСӣ 
data 31#5#535+##07Ғ##ҒРЙ 
84 data clelfü?7fttü?7£££:BD 
185 data 31е1#0+#8+#01+##+# #9 
186 data fleif?"t9eü83ttft8 
187 data elelf3SfbcBOefftff8 
1188 data flelfifftS803eü0?tfc 
1189 data %94540ғғйЙ?ей? {+С 
1198 data #9+#+##07ейӣӣйӣбт+#с 
1191 data +1+#*ff*835c000B67 +3 
1192 data е1#+#492С09096710 
1195 data еі #5 +##еедӣйбтей 
1194 data #121 +#+#8#ейтейтей 
1195 data сіеії #8 ей ей?зЗӣ 
1196 data 8GileiffefeifB856708B 
05 #290 # #00000 #380 1197 data ЙӘ1е1%й02сй01%267йй 
üarttatteaanaatsa data aleitif*ta87266n0au0 


ҮЛ NR SUPER DRASOM И М 


й1#4#1##8с#+е@йй 
Biteséi1féséaBaáesecaaa 
aitttitt92cftteBag 
143414489442000 
üileififtG2é£cÓBgB 
дігісдаййӘғғеййай 
йігі%Ғ2й80294ғсй0й0 
Я1е1 #0900 41 f #83000 
412194423 + FBO 
01%5%40й1с54ейййй 
aircesanicéeemaaa 
üairéeéBaaaaseceécana 
05е! #900с+ + #35000 
97е1+#0018++#+0000 
есі #00913 ++ #09000 
f こき 1 #9039 # #200090 
{341494939 ¢ #20009 
4821 %9й19ғғсдй00 
ісе) +4493 ¢ {+09000 
гезатаййӘғғейййй 
83сйеййізіісйаййй 
üSeica7étsee2B0na 
aTrzasaécseactanpao 
9+++00+# {80000000 
ifteBaréapananaan 


ヒー キー し よー ヒー‏ عم عم حدم حم عم ر عم عم مم 
QU‏ ل“ فل“ 


LA C4 C4 C4 64 C4 ҺӘ ГӘ БЭ РЭ ho that 
` (Л $s نت حم زم م‎ чо 03 J 7 CR. + CA 


data üleitiftfS823ff808 
data й1е1+#1+##8ез+# +300 
data 91†3 す 1 すす 9 ヒ イ イ イロ ロロ 


ーー トー ыра に よー に エー に エー に よー ヒー トー キー 


data dd 

HD = 

read Яж 

if CAFE" then Söta SRELI 
tor 0=1 to lan(H ま )=teP 2 
ACE$=midf (A$, 0,2) 

uPoke ЯР, ча1 < "5 "+ЯСЕ$? 
HbD=HD+1 next 

1226 30to 1228 

1227$RE1 

.1228 Print "I LOADING NEXT PRO 
GRAM!" | 

1229 PETAT" MAKE READY CMT" 


1238 chain 


к. ка рь トー トート ーー кене ға عم‎ に よー に キー トキ ニー に よー үр k— ра къ de 


هم عم عمو لن حنم عم عم حم ع عو یمو مر مم عمو عمو مم عم 
C4 F2 ce 0 чо 00‏ أ ч) CO —J CS‏ ت ما دم C4‏ 


Ер Жа ха OD で つり قد‎ や ود پد ود ود‎ 


pa 12 р . 
+ 
PI R3 B3 to Р. 


data aaaafftaaftffaaaa 
152 data 55555:tff£€4$5395550 
153 data aaaaaftfftftftaaaaa 
154 data 55595(+##55+41+#55535 
155 data aaaaftfaaftftaaaa 
156 dàtà 555444555544 5355 
15? data aaaftftaaaattfaaa 
158 Жажа 9954514159399 35 € £35 
159 data заї # + азааазї # ѓаз 
160 data 5##455555555+#+#+#5 
161 data fftfaaaaaaaaaattft 
162 data ftfttffftfttftttttf£t 
163 data fttffttfftftftf£fttff 
164 data aaffaaffttt*aattaa 
165 data きき f† す 5 きす すす すき きま すき 
166 data aaffaaffftfaaf*aa 
16? бақса 52544956144 ЯҰ55ҒҒ55 
168 data aaffaafftfaaffaa 
169 data 5544554444554%55 
178 data affaaatfftaaaffta 
17r- data SPTSS4€985$£9*835f€ F5 
172 data *faaffaaaaffaatf 
173. data ТЕЗЖЖЗЗТ ОЗҒАН 
174 дата **aftfafttfaftatt 
175 data t$*9559$91£955* 45585944 
176 data ffaatfaaaaffaatt 
177 даға,тғатға 5555 ғ 
178 data f*ffaaaaaaaatftt 
1/9:4314a. 9 まき うす きき きき きき まる うら ま さき 
188 data aaaaaaaaaaaaaaaa 
181 dava さら うき うう きき うき きる きき きき 
132 data aaaaaaaaaaaaa2aaa 
おき し きる も まさ 2555953555539 09 
184 data fftfffaaaaaafttttft 
185 dät ҒҰЗТТҰЗВ5555Ғ45 474 
186 data ftftattffftfftfatt 
197 data #1#9555565555555ғ7 
188 data f*tfffaaaaaaft*ttftf 
189 data 9525:7555555Ғ4555 
198 data aaaftftftaatfttftaaa 
191 база きき きす すき きま ます すう きき 
192 data aaaffaaaaaaffaaa 


зазазазазааззааза 
203 E :955955395555595955 
204 data aaaaaaaaaaaaaaaa 
205 (жга 3995339339599 ا د‎ e ا‎ .- 
206 data 552585392555555559 
207 data aaaaaaaaaaaaaaaa 
208 data 5555595334559 5555 
2809 data aaaaaaaaaaaaaaaa 
210 data 555ҒҒ55959554ғ555 
211 data aaaf*aaftftaat*faaa 
212. data きき う キ イイ オド ます も すす あき うら 
213 data зааї її їааї # # ааа 
214 data 555++#555555++555 
215 data aaaaaaaaaaaaaaaa 
216 data 5555£fttttftt5555S 
217 data aaaffaaaaaaffaaa 
218 data 555Tt* 4599959421255 
data aaaffaaaaaaffaaa 
баса 99555F£4 FETE 
data aaaaaaaaaaaaaaaa 
дата ЗЭЗЗТҒЕТЕРЕЕРЕ5З5 
data aa3aaaaaaaatffaaa 
data SSSPPHITTTTTFTSSS 
data aaafftaaaaaaaaaa 
ЧӘШЗЕҒСЕКТЕСКЕТӘЗІЗ 
data aaaaaaaaaaaaaaaa 
data SISSIES 
data aaaffaaaaaafíaaa 
data SSStftttttftft555 
data aaaffaaaaaaffaaa 
баса 55551 ft ЕТТІ 
data aaaaaaaaaas3aaaaa 
дата 59594: Ee 0041 T0353 
235 data aaaffffaaaaaaaaa 
2356 data きき きす すす を すす きら 9 な づ 
257 data aaaffífaaaaaftfaaa 
238 бата ЭЭФЖФТҒҒТЕҒҒЯ5932- 
239 data аааааааааааааааа 
248 data 555#######55595955 
241 data aaaffaaaatfftaaaa 
242 баса 3JSSFt 9959971 +1555 
245 data aaaffaaaafffaaaa 


لتا ح١‏ زع هن + ^J Z™ ¿n‏ رت تي 


F3 F3 PJ FJ F3 Рә ta ذم دم د‎ РӘ P3 دم ذم نم‎ FJ 


ҚА ҚАСҚА (АСА P3 زم‎ F3 ذم ذم‎ F3 PJ F3 ta to 


FEFEEFVEFETET IET TS 
f# イ キイ イイ キョ ョ イイ オイ キキ 
ЕТЕКТЕ С t? yt 
tffff*faaaaaattftftf 
ГЯҰҒав5595595%4-44 
++ + ааззазаа# # + + 
すす 本 の RS の ++ 
ffífaaaaaaaaaattft* 
1⁄4 353 өйө 2295” 
ff*aaaaaaaaaattftf 
を すき 生き らき あき ひま キサ 
fíffaaaaaaaafttt 
£££455555555t(4£t9f 
£££ft£faaaatttf£t££ 
АЛАКА ЕХАЛ 
КА 


вал f CO ته‎ CÓ J C CR + C4 F3 e D ч 
cu 
ü 
ct 
ш 


(А А сд tA CI CA (А (А CA ОЧ F3. د‎ FJ دا دم دم زم‎ РӘ トリ مالم‎ e orm < r< + + b or — ت ت ت ت ت ت © تت‎ © 09 


£A PO ке ت‎ эр OO ل“‎ Ov АЛ Ж А B) к= бр «D 00 7 OS UI 4 04 Һә م‎ бр «D 00 04 Ov СЛ 4 СА РӘ н C 


Ré > か る Pee Ба de Ge ғо ға ыз Geb de get кы р» ge ғы қора o B- トー кае と と 0% (ek рь サー ға қа тоға ға қаға (ges |4 Бы ға раро Фе > p қа 


D rop ҮҮ. 193-data ttttft555555tt* ftf 244 data 555%%%%4%%%555555 
++аааааааааазаа++4 194 data tfaaaaaaaaaaaatft 245 data aaaaaaaaaaaaaaaa 
£4£55555555555511 195 data.T19599* $ £ £4 38 SS F4 246 data 55555555555529093 
ifaaaaaasaasaafí 196 data ftffftfaaaattttttf 247 data aaaaaaaaaaaaaaaas 
st£t£€555555554(£(£(5 197 база 22555591935553555 248 data 4599533555995 53392 
азї { { азаззаз і # # за 198 data aaaaaaaaaaaaaaaa 249 data àaaaaaaaaaaaaaaa  - 
555t£4t55554£4£4£555 199 qayta 58553555525555955 258 data S$55ftt85ftt* f$ f 129292 
эзаї + аззаї # аза 208 data aaaaaaaaaaaaaaaa 251 data aaattftfaaaaaaaaa 
5555;;;55%::%5555 281 data 553555555355 5852 


SISSIES 


pio 


リス ト 4 SUPER DRASOM デ ー タ 2 


aaaft*aaaaatfftaaa 
SO 
aaaaaaaaaaaasaas 
oe B ea ks bs te Ña Же айе lhe оры гы! 
aaattttttf{t{ftfaaa 
$954£€4*59559555598 
aaaft*ftftttftffaaa 
24.5-2227-1-5-15:-4-2-555-4-1 
aaattfttftfff*tftftaaa 
2955535953355 555535 
aaaaaaaaaaaaanaaa 
22Ғ%55555555595 
aaaffaaaaaaaaaaa 
95994 * £F FT 185595 
aaaffaaaaatffaaa 
555 t 4 Ж к ж... 
аааааааааааааааа 
291955535 25%5055%9 
отта ғғ 
aaatfaaaaaatfaaa 
SSS 4 555555 t1 359 
aaattaaaaaafftaaa 
3959005355535 435355*5 
343332333333333 
SSS $ (tb t + 555 
aaaaaaaaaatititaaa 
の すす や を 下條 すそ きき 
aaatffaaaaaaaaaa 
SN t tt titit SSS 
aaaaaaaaaaaaaaaa 
55059055559555555 
33333333333333 23 
йЙйЙййййййййййййй 
ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ 


SUPER DRASOM 
FINAL DATA PROGRAM 


data tf ロロ イロ ロロ tf ロロ 
118 data +f ロロ tft 
120 data tt tt A 
138 data ЙЙ#+#ЙЙ++ЙЙ++ЙЙ++ 
148 data ff ロロ イロ ロイ イロ コロ 
158 data ff ロロ tt ロロ 
168 data ttt 
178 data tf ロロ t+ 
138 ЯС=&0Е13З 

1299 -tO Кий fto 15 
2808 for Оз] to 8 
218 read 9$ 
tor P1 to 


Print 
1818 clear 256,%8Е6Ғ 
18280 dim TMF ¿45 | 
1058 НІЗш"зоғй":НІсійййЙ 
for 


scod 80.80:scod 1,4: =соў 


for [=й to 
g8.-1808:next 
1078 for IsÜ to 9 


t 

1090 scod 11.,92:scod 19.92 
1198 есе! I8;155«col- 011515 
1118 mag 2: моче on:3goto $NA 
1120$PRT 

ТӘН ЖӨЖ ші to lenúxDRt) 
1140 RDz2£&38880*DXDWVv*32 

1158 D#=mid#*#(DR#, I.1) 


¿Joto 1188 

11?B әроке RD.ascii:D$5-3536 
1188 DXzsDN-1:next:return 
1198$HISCORE 

1280 locate Z21i.5:Print HI 


$PRT:return 
1220$SCORE 


return 
1248£$INGI 
1250.locate 225;URTPrint "Уу" 


Үшій 


turn 


Ж 


2 1 ; А 1-76» ы 
мж” 2 * k s 


Теп Я) step 


Is to 4:ТМЕ1> =й: пех 


12:156 L to-lM 


18880 COsrndc8»5*4:sco! І, С0: пех 


1160 if D$zs" " then uPoke ЯС, 


1218 DX2280:D0V25:DB8$-2HI$:30su5 


1230 locate 2i1»/:Print SC:N: 


1260 if UR-10 then UY=9 else |) 


1270 locate 22,UV1!Print " "tre 


tt イロ ロロ ロロ ft ロロ ロロ t+ 
tt*t£Banaanaarcrtaaant 
+ イロ ロロ ロロ tt ロロ ロロ t+ 
*tttftftanaaanananat 
+++++@ЙЙЙЙЙЙЙЙЙ+ 
+ イイ ロロ ロロ ロロ ロロ ロロ dt 
tttftBaaaaccaaant 
#+++ЙЙЙЙЙ++ЙЙӨЙ+ 
+ ロロ ロロ ロロ ロロ tt ロロ ロロ tt 
+ ロロ ロロ ロロ ロロ ロロ ft 
taaaaaagaagaatct« 
+ ロロ ロロ ロロ ロロ t+ 
+ ロロ ロロ ロロ ロロ ff 
+ЙЙЙЙӨ#+ЙЙЙЙ+++Ү+ 
£íaanarrcananaatttt 
+ӨЙЙЙЙЙЙЙЙЙЙ++#++ 
+ЙЙЙЙӨЙЙЙЙЙӨЙ+++++ 
+ЙЙЙЙЙЙЙЙӨЙ+++++ 
+ӘЙЙЙЙ++ЙЙӨЙЙ+++ ++ 
+ӘЙЙЙЙ++ЙЙЙЙЙЙЙЙ+ 
: папа + +08 ВЯЙЯЯЯ + 
faanaagaaaaaogatcaaot 
ғаййаййаайағаййя 
+ЙЙЙЙЙЙЙЙЙЙ+ЙЙЙ+ 
+ЙЙӨЙЙ++ЙЙЙЙ+ЙЙЙ+ 
+ЙЙЙЙ+#+ЙЙЙЙ+ЙЙЙ+ 
† ョ ョ ョ ョ ヨ †† ョ ョ ョ ョ f† 昌 ロロ † 
£2555555535sf* f80 (4 
+ ззаззэзаззаз # #0 + 
5555955955540: 
faaaaffaaaaaattf 
(5595414655553 555 14 
faaaatfaaaaaaat*t 
150959059508 ЫСЫҚ, 


ト 5 SUPER DRASOM デ ー タ 3 


E 


3 F3 NJ FOU 


© 


ІҢ Pq に オト うー C9 ч 


C4 C4 C4 C4 C4 C4 C4 C4 54 C4 C4 CA C4 C 


トコ ニー キー ニー トー ニー ヒー pa هم هر عم عم عم مم‎ 


УЈ [$9 ف‎ 0 Nm 


2d 


238 S*#=mid*ú(R$,. Р. 2) 
249 Роке Яб, џэ1 "6 "+5 $) 
290 HE=HD+1 

268 next P 

270 next 0 

271 restore 

28988 next I 

2980 for Іт%1218 to &1580 
3 4 4 уроке І.ғепФ%2559 
ЗІЙ next 

3280 for 1=&1500 to &1яЙЙ 
54254 цроке I.8 


Тай next 
150 for Іс%18й0йЙ to #1000 
: Baza 


| リスト 6 SUPER DRASOM メ イン 


1288$RO0UND 
1238 ROzRO*1 

1508 ТӨсете 21s19:PrFint ЕО Т 
1318 if R0»280 then Soto $GIUE 
13280 gdosub まじ HHNGE 

1330$5H 

1248 locate 21;.13:Print SH" 
258 return 


4 
n 


i360£$3SIUE 

1370 Sgosub KEIN 

1598 Primt FEOF Bat to 5 

1799 Жоғ L=0 to i188 step ій 
1488 sg 35.7.15:54 2;.I.10:sleeP 
132 

1418 next:next:s9 23..80:z9 2..й 
1420 locate 5.,2:Print "ROUND 2 


0 CLCERR"*cursort3. 5) 3 "SPECIAL 

BONUS : 1888B0Pts":cursortzZ.72?; 

"ООВ SCORE 3 *r5SC*100900 

i438 SC2sSC«180080:zleeP 5:40%0 

1458 

1i4480£$0UER 

14580 39osub ЖКЕІМ 

1468 for Гей to 11:Тос I to-18 

B.-i880:next 

1470 Print "ly" 

]4o8.cis!locate 5:22ғРғіп% "THE 
SUPER DRHSOM"scursor(3,; 45: "HI 

—5EDME қ "SHLItcursoór05,55)T BW 
"ІНІ 

1498 locate 1;.8:Print “AND YOU 

R SCORE 4$ *iSCrIcursor(it5,18»21"*E 

ND BüNUS-188080":SC-sSC«1868080 

1500 locate 5;,12:Print "NOW : 
"vesctcorsokrC5s145»s "ROUND s: RO 

9 if SC^HI then e!se 9oto 1 


эй Ж 


E) Ta 


ze S XC E に ok | саг рім ES 
ーー た DUE d eS pr RA B 


data faaaaaaaaaaa2aaff 
data TIST 
data ロロ ロロ ロイ 直す + 
data +ЙЙЙЙ++@ЙЙЙЙ+#++Я 
data ff f Ff ¢ ¢ + 
data +ЙЙЙЙЙЙЙЙЙЙ+#++ 
data +ЙЙЙЙЙЙЙЙЙЙЙ+++ 
data fBaagmaaagaanatrtt 
data #008080 { : 800008 ## 
data + #09000 # #00000 ғ 
data tt トロ ロロ ロロ tt ロロ ロロ tt 
data #+# +009009000009 ## 
data ҰғҰЙИЙИЯОООИЯОЯЯ 
data ttramaagagaonaatt 
data ғғййдаййайайайағ 
data ma 

apz&as6Bs 

read A$ 

if ЁФ= "241" then Joto $REI 
for б=1 to 1епсйФу =teP 2 
ACEf=midf (A$: 0,2) 

vPoke ЯО, џа1 с "ё" +ЯСЕФ? 

ЯС= #0 +1: пех? 

344 goto ささ: 

245%РЕ1 

346 Print "iN LOADING NEXT PRO 
арам" 

347 Print” MAKE REDY СМТ" 
348 chain 


Cn + س رمع إن‎ O «D 00 7 (qv CH RR CA زم‎ 0|. 


ーー 


Fa 4 EN CA C4 C4 C4 C4 に すす エ オ ト ュ ト ュ トウ リト リト ゥ リト リト ュ ト ュ トト) 
~J Dh 


C «D ca 


+ 
مم 


C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 04 C4 


AÑ 


LA 
qu 
cA hy 


~J 


D C FJ (Q 


if rndc19880»«50 then Я=ғп 
292 
upoke I-A 
next 
Й for I=&1DBB to &1FFF 
418 uPoke І.255 
4280 next 
438$RE1 
448 Print "E まま た せい た し まし た " 
450. FELINE MAIN PROGRAME LOA 
[し ます 。" 
468 chain 


D xu Oy — 


Ф 64 4 сь CI 


1528 HIsSC:locate 3.16:Print " 
QUK" МГЕСОКЕТ!І,"ұ Тесаге S. ます dn 
Pot "NAME IN 5 WORDS''",.HIS$:HI 
$z'attfiHIS$-«" 4,92 
1550 locate 5,20:Print "HIT AN 
Y KEV TO REPLAY!” 

1548 if inkeu$z"" then goto 15 
in 

1558 Print "IMy":30to 1040 
i5568£$MBh 

1578 5С=й: РО 
1528 роке %8 
1590 for Ізі 

3 2slI*250:cal! 
1600 tor 


&SERO:n 


3..,0:3o50sub $HISCORE 
inkeu$z"" then Joto 16 


CHSE-zB:KUSEzAa:g2suUb $RDUN 


CI ra PJ rn 


баа55аа55аз" 
Жоғ Іс0 to 


Сә ка deor 
cem cn + 
e 


I 
pa 
[кх] 
"m 
2 
Т) 
х 
с+ 


668 DR#="plauer"šsDX=21:DV=16 
osub ЖРЕТ 
1670 DR#$="start ":0Х=21: 
аотыһ ЖРЕТ 
1688 Play "ti3BHo5s1!3ddeddr3ee 
feeri938agagedc"."ti38ao2l2ddedd 
rieeteerijgagagagedc"."rtissus?l832ao 
&cccccrizdddddr3eets3g3tedc" 
БЭЙ if Play then Joto 1690 
US Toccate, Z1.1l6fPrinfi" 
ЕШ TOCA? i 

ІРІ RHDDRE-&B2380:Poke &3F29.£8 


"9 ат (и Os 


Dv 


を 「 な ん て バグ が と れん の じゃ あ /」 と 日 夜 ( 夜 日 か な ? ) お 嘆き の マシ ン 語 ビギナー の た め の プ ログ ラミ ング (プロ グラ ム で は な い ) テ クニ ッ 
ク ( こ こ を こ 一 する と 何 バ イト 少な て て すむ と か , あそこ を あー する と 何 サ イク ル ん 速く な る と か いう テク じゃ な く ,。 いか に バグ を 少な くし , 
、 見 や すい プロ グラ ム を 書く か , と いう こと で す ). ま ず , フロ ー チ ャ ー ト を 描き , ルー チン 問 の 関係 を まとめ ます . 続い て 各 ル シー チン を ネス テ 
イン グ の 下位 か ら 6 作っ て ゆき ます . この と き 。 各 ル シー チ ン が で きる ご と に テス ト ・ ル ー チ ン で 動作 を 確 


か め る こと を 忘れ ず に . これ に より ,。 


» ч 
< > * 
Fari б eda * ы” Nom - "E % Б "ca 
D eR い E 


x 4 ` 1 < 
Fe TAR T 5512750 
"rA 


MO 


; | リリ スト 6 SUPER DRASOM メ イン 
8.202 ° 2020 if statusC11»z0 then loc iteCRa, 05 
1720 loc 8 to XV 11 to-188.-18080:TMF*2»5-80 2468 loc RR to-188.-188 
17328 VA=9: X= lopty 150:MF=0:MX= 2030 return 2470 loc 1 10-100, -190 
я: Мт=й 20480$KUCHU 2488 gosub £$5CORE 
1748 sco! 8515:sco! 1。15iscol 2858 if KUSEzZB then return 2498 osub #501 
E 4 2868 SENO-SSENO*«1:if 5ЕН0=>4 th 2588 loc 3 to-188,-1880 
1758 qosub $INGI:3o0sub $SCORE en 5ЕМО =й | 2518 МЕ=й 
DOWFsB:TEX-sO: TEV-ü:KUI-Z 2878 SET=DL1+SEND*4:3osub ま SET 2528 return 
= іпкечсӣ) : В=іпкеч (1) 2088 5=0 2538$HRN2 
ifX(R8s54»*CXM»8»then XsX-8 2098 for 1=4 to 8 2548 if BRR<>9 then return 
1 す (日 =55) (< く 14 は then Х=Х+ 21880 if ztatuscI»280 then 5=1:5 2558 日 日 = は 
oto 2120 25680 SC=5C+20:CH=9 
1† (日 5) WT く 1 4) も than V=V+ 2110 9osub $08 2578 Soto 2450 
| 2 2128 next 2588f$CHDÓNGE 
if て CH=51)*CV>8)then Y=V -8 2138 if S=0 then return 2598 on RO osub 25640.2678.265 
if (A=33)*(VA=10)then UR=9 2140 !oc S to-180.-100 0.,27800,2660,2688,26480.2650.266 
| 3osub $INGI else 1 て 日 = ささ 3) «CUR 2150 if rnd(19)=1 then else re 8.28780.2680.2630.2708.,27180.271 
| 23»5then UR=10:qosub $INGI turn 8.2700,.,26980.2680.2670.2660D 
1822 it£Bsz4)w*cMFzüDthen loc 1 2168 loc 5 to FOALED 8 2688 СН=й 
to X,'Y-18:MFsi:move 1 to x.8053 2178 move S to rndcií1480»5.140.rn 2618 if KUSE=9 then for I=4 to 
tb las; "l380o3co8co3co8c" 445) +2 , 8:1oc І 10-109, -100:пех+ 
18480 if MF=1 then it status(1) 2188 return 2628 if CHSE=9 then loc 9 to-1 
=й then MFsü:loc 1 to-188.-1808 2198$0B 98.-1йй 
1850 if соіпс4124>-1 then ЯЯ=с 2200 CHX-sPritecCI,;1) 2630 OL1-25SET:return 
| оіпсс1) :9050Ь ま HHN 2218 CHY=šPritećI, ð? 2640 КИСЕсЙ:СН5Есі: сой 9.64:r 
1868 if соіпс0) <>-1 then ЯЯ=с 2220 g9osub %М15 eturn 
oinctg)kgansub $BOM 2299 return 2658 KUSEsB:CHSEsi1:scod 9.68:r 
| 18780 loc Й to KJ Vi SCRSSCR^1 240$B0M eturn 
| 1880 if SCR=2 then call &8E?0: 2258 if ロ H=1 then return 2668 KUSE=0:CHSE=1l:scod 9.72:2ғ 
| SFLR= ロ diHDDEE=HDDRE+B 2260. for Is10 to 100.sgteP 2 eturn 
1890 i4 HDDRE=>&2 ロ BB then Poke 2270 for 0=1 to 18 | 2678 KUSE=1:CH5E=0:SET=32:905sU 
&£8F29,$80.$82:B8DDRE-2£02880:905 2288 scod Й,8:5с01 B.rndí95-*2 $SET:return 
ub $ROUND 2298 s9 3.7515 2688 KUSEs1:CHSEsQO:SET-48:90suU 
19 call &8EñRB 2500 59 2,1/0,15 b $SET:return 
1918 gosub $CHIJO0:90sub $KUCHU 2:18 if inkeu$z"e" then Print 2698 KUÜSE-Z1:CHSE-B: 5ЕТ=76: 9050 
:9oto 1778 "M':console 1;1:clear:end bos£SET:return 
1920$CHIJO 2320 scod 8,0:scol OF Rd 95 +2 2700 KUSEs1:CHSEs8:: 
1938 if CHSE=A then return 2338 next:next:s9 2.,й b $SET:return 
1948 і#ССН=Й) жеп 10) =1) Е ћеп 2548 for Із15 to 8 steP-1!s9. 5 2718 СН5Е=йЙ:КШ5Е=1:5ЕТ=1614озш 
CHXsrndti158»0:CHVzü:CHsit:return »:IisleeP 2: SNORT b $SET:return 
19580 it CH=0 then return | 2550 SHsSH-1:if 5H=9 then %0%0 27280$5ET 
1960 CHVsCHV*1:i£ СНУ>148 then 2730 for. 1=4 to 8:scod I,SET:n 
loc 9 to-188.-188:CH20:return 23680 Aosub %5Н ext'!return 
1978 loc 9 to СНХ, СН“ 2370 90=0Ь 1500 2748$KEIN 
1988$MIS 2380 Joto 1640 2754 for Is8 to 1000:9$=inkey$ 
1998 if TMF<1)=0 then Тос 18 t 2398$HRHN freturn 
o СНХ, СНУ моче 18 to %.Ұ.6-Р0/ 2408 if ЯЯ=1 then return 
4sTMFC1)=1 2410 scod 3.8 
2880 i£ TMFX25»5s0 then loc 11 t 2428 if UR=18 then Joto $HQN2 
o CHX.CHV:moue 11 to XV. 6-RO^/ 2430 if#<(RR=>y4)*<(RR<=95xthen SC= 
4: TMFC2»221 SC+18:3oto 2450 
2010 if status(10»220 then loc 2448 return 
18 to-188,-1808:TMFC1»5sà 2458 loc 3 to sPritelAhd, 1), хрр 


リス ト フ SUPER DRASOM エ ディ タ 


locate 2,280 
Print "RDDRESS:&"sihexf$cRDD 


35zub НӘН 

WE£22NSt* 

WE$zWuES$-TO0f 

uPoke ЯСО, чаї "2" +0Е$Ф 2 

Я +=" "100 = 900 +1 

locate A: 28 

erint "ADDRESS:S"ShEex$CADD 


[PROGRAM NAME 

| PATTERN EDITOR 

| DATA INTO U-RAM' 
i 

|*HOU ТО SAVE U-RAM 
| 


C аз uA 


CO0+(X+2)+<(V*5+Š5 


P p iA Fj € 


i زم‎ oc C) Ca Co то 


(ӘӘ C ӘӘ (ә ーー ーー-ー ーー ーーーーーーーーーーーーーーーー ーー 


locate X*2.,VY*S5e5:Print "x" 
locate X*2,VY*«*545:Print chr 


pO P Ka ы ت © م‎ 
r. пр бр C ар CO C 


eno 
qus cm Os 


USRUE "FILE": 
Ніс5ТНЕТ U-RRM 
HS=END U-RRM ADDI 


en cn 
Joke 
n 


бі Сә бі Сә бә Ср (Фф бр ы созы гы mm соор 


locate 11:19:Print WES 
next 
next:g3oto 270 
#HRH 
if S$=" 0000" then RHS#*="B" 
14 S#*#="BBB1"U U then ЯН5%= "1" 
if 5%-"ОӨЙІЙ" then ANS$="2" 
1+ S$w"BD011" then 日 NGS ま =" さ リ 
if 5%-"010й" then ANS$="4" 
if 5 ま = リ 11" then ANS$="5" 
it $5$2"8110" then ЯМ5%= "6" 
if 5S ま ="B111" then ЯМ5%= "7?" 
T $451 0^ then ЯН5 += "8" 
it 5#= "1001" then ЯН5 += "9" 
1+ 5$="1013" then ЯМ5 += "Я" 
if 54="1011" then ЯН5%= "В" 
if $5$2"1100" then ЯМ5 = "с" 
if 5$="1101" then ЯМ5%= "0" 
if $$2"11180" then ЯМ5$%= "Е" 
if $$2"1111" then ЯМ5%= "Е" 
return 


if R$s"" then 90%0 288 
if R£-"3" апі "=1 then 
if A$="#" and Vz8 then 
1+ A$=";" and X»8 then 


TT i D w 


CREATED BY 

T.HIRAGIMOTO | 

———— DO F 005-і 

Print "ШЫН" 

input "BODRESS:&":RHDD$ 

А00 =031 4" "+800 $7 

cls 

locate 5.8 

Print "TINV PATTERN EDITOR 


"рата 
S) ou OY — Os 


if A$=":" and 


if R#="z" then 
if рый then 
1% 日 ま =" こ then 
Joto 2838 
Місшуж5%5 
locate Zz*2.Vl:Print 
B1cMV.X»z1 
Soto 2868 ^ 
Yi=Y*5+5 
locate xX*2.Vl:Print 
917, Хх) =0 
goto 288 
A$="": for 
for 0=8 to 27M St 2P 
for P= to ? 
"IIl R$*num$CRICI: ロ +P) > 
next 
こま = レ 19h と まま 日 ます ) 
253b НАН 
S#+=lett+*(R*, 43) 
は ま = 昌 5 ま 


i+ عم‎ 1- ке bp トー c CO» —J n n 


ҮЛ + ОЧ BO e o Co 9 o РД 


for Is33 to 
| ! locate 2 
р locate 9 

1 

2 

2 


Ы Ж WS やり こす ^4 74 7 


D oO) 74 Qv CR. +. C4 F3 c 


2 
ЗІП” 
E I 
本 人 де 
1: 

I 


с 
ре] 


locate 

locate 

locate 
next 
locate 2»5:Print rPt $:32," 


ДАР, ЖҚА сі 


1 
І 
І 
sDLtBrint ж” 


> 
? 
で 
5 
5 


locate 2; 101pr int EOLA 


258 х=й: =й 

268 dim R16C1:3255,B1€4(1;.32) 
マデ ロロ! 

288 A$=inksy $ 


プロ グラ ム の 完成 時 に バグ っ だ と し て も , それ は メイ ン ・ ル ー チ ン か , コー ル 時 の レジ スタ 破壊 に 原因 が ある わけ で , デバ ッ グ が えら く 〈 楽 に 
な り ま す . 慣れ て くる と 2K バ イト くら い の プ ログ ラム な ら , フロ ー チ ャ ー ト な し で いき な り 作 れる よう に な り ま す . これ を 読ん で ,「 ん な こ 
. だ ぁ 当 た り 前 だ 」 と 思っ て いる 人 , あな た が マシ ン 語 で ゲロ グラ ム を 組め る よう に な っ て この 方 法 を 発見 する の に , どの くら い の 時 間 が か か 
_ つた か 考え て みな さい. 知っ て る 人 に は 当然 で も , 知ら な い 人 が 発見 する に は 大 変 な の で す . (人 間 ア セン プラ の 未来 海 剰 那 ) | 63 


\ . en : < 


OOO0O000000000000000000000000000000000000000000000000000000000000000000000000000C 


) 


ソノ シー ト を 使う 前 に 


プー ルト を 全う と あき に は 、。 アァ ジー ト 
を 破っ たり , 傷 を 付け だ た り し な いよ うに , 
ミシン 目 に 治っ て 数 回 折り 曲げ て か ら , it 
意 し て 切り 取っ て くだ さい (ソノ シー ト が 
読み 込め な く て も お ぢ お 取 替 ど きま せん の で ご 
注意 くだ きい ), 

支 ホ コリ も ロー ド ・ エ ラー の 原因 に な り ま 
Зз. カモ ッ ト に 録音 する 前 に ホコ リ を な る 
er? СӘТ あ い で くだ きい 。 

放 ソ ジノ シー ト は 何 度 も 聴く 前 に 必ず カセ ッ 
ト テ ー ジ に 録音 し て 嫌 いて 〈《 だ さい 。 

支 ジ ノシ ー ト は 通常 の レコ ー ド と は 大 きる 
235-270, 7МАҢ--О?ле” А-- 
ト の モー ド で は 正常 に 動作 し ませ ん . マニ 
ふみ アル の モー ド て 使っ て くだ すい 、 

廊 い っ だ ん フン コン に ロー ド し て OK と な 
っ だ 場合 は , マン コン か ら 別 の カモ セット や 
ディ ォ ス ケッ ト に セー ジ し て くだ る 


ЛІ 61 o 


E 


(p.44)  (2553") 
жп — Fas + UE 

電源 ON の 後 

RUN "PiO" 

で 自動 的 に マシ ン 語 と デー タ を ロー ド し 

て 実行 する よう に な っ て いま す . 
ж-да 


ЛИ Е Р я 


kw. kk t. t . COCO t t t t k t M. M M. M M MM MBA M MM BAM MM w k w DE DE w MM M w w M MM MM MM 26 MMM. 


今月 の 「 パ ソン コン DJ」 は , 皆さん か ら の リク エス ト に お こ 
た え し て , PASOPIA の ゲー ム が 初 登場 し まし た . ІР! 


SAVE "PiO" 


SAVEM “C&M”, &H4OOO, &H46FF, 


&H4000[ RETURN | 


SAVEM "DATA", &HBOOO, &HCOFF, 


(p.96)  (2'02") 
жп — Fas E UOTE: 

LOADM "MIRACLE",, R| RETURN | 
娘 セ モー ブ 方 法 
SAVEM "MIRACLE", &H3600, & 


H6F9F, &H5000| RETURN | 


_B2PC-6000 J — Ac 


(p.68) (154”) 

жп- F 3⁄2 び ぴ 実 行方 法 
EFE mS 
CLOAD| RETURN | 
RUN[ RETURN | | 
で 自動 的 に マシ ン 語 を ロード し て 実行 す 
る よう に な っ で いま さす 

*t—7 bi 

CSAVE "WATER" 

で BASIC を セーブ し , _ 

PiO モ ニタ か ら 

SAO9O, ВЕЕР, МА | RETURN | 


で マシ ン 語 を も モー し ます 。 


ст FC E 


(85 年 7 月 号 (319") 
娘 ロ ー ド お ぉ よび 実行 方 法 
LOAD "CAS : PUNK" 
RUN[ RETURN | 
で 自動 的 に マシ ン 語 を ロード し て 実行 す 
る よう に な っ て いま す . 
*-c—7J ik 
PiO パ ズル 


Pio 
nA 


バ パンク ・ ポ ン 


зж 0000700 HAME 0010000 e 01 $ 09 01 


変わ っ て ファ ンタ ジア ン の 話 に 移る . 今や っ と 全員 クラ スチ ェ ン ジ ど し た だ た ばかり. 友達 (1 ユー ザー) は も うと っ くに 解け て る の に …. 
だ れ か レベ ル い っ ぱい に な っ だ デー タ と 変換 し て くれ な いか な 7? 
|" で PiOPiO を 利用 し て ファ ンク ラブ を 作ろ う / P.S.2 時 計 を 拾い ま し た . お 心当たり の 方 は 連絡 し て くだ さき さい. メロディー ウォ ッ チ で す 。 


ミラ クル ・ ボ ー ル 


SAVE "CAS : PUNK" 
CBASICT t—7L, 
MON(RETURN | 
W, 9000, DDOO|RETURN | 
0 その 明 を を セージ し ます ず す 、 

支 遊 び 方 
主人 公 の PON 君 を 操り , 敵 か ら 逃 げ な 
が ら 敵 を 床 で 圧死 る きせ る ゲー ム で す . 
PON 君 は |4| |e| で 左右 に 動き , 
| SPACE | ジャ ンプ し ます . また [2| で 
下 の 床 を 下 に ぶつ けり,|8 | で 上 の 床 を 上 に 
ぶつ け ま ます. ボンベ で が 0 に な る と 死ぬ の 
к ボンベ ペ が 出現 し た 6 取っ て 《 だ きい 、。 


62.11 PADULA 


(p.133) (42”--49”) 

女 ロ ー ド よび 実行 方 法 
C 面 と D 面 に 収録 され て いま す . 
BLOAD4—1, "CAT—1" 
で C 面 の アプ ログラム を ロー ド L, 
BLOADZ—1, "САТ-2” 
で D 面 の プロ グラ ム を ロー ド し ます . 
A= &HAOOO:CALL A| RETURN | 
で 実行 し ます . 

KET 5 
BSAVE#— 1, "CATHEY", &HAOOO, 


& H3 1BF( RETURN | 


12 MZ -1500 


C85 年 8 H5) — (258") 
* u F お よび 実行 方 法 
BASIC(MZ-5Z001) を 立ち 上 げ て 
NEWON2 | CR | 
RUN "CMT: THE CLIMBER” |CR 
са, ATLET. 


*-t—7Jjik 
SAVE "CMT: THE CLIMBER" 

* 3t U 7; 
[1]3][e][2] C MAN を 上 下 左右 に 動か 


水道 管 パ ニッ ク 


オレ を 
P.S1 ミン キー モモ ・ フ ァ ン の 方 へ . みん な 


LUT DAN» OUI, マー ルス 
トー ン を 10 個 取っ て , 一 番 上 まで 行っ て 
(NS v. 


トー ロー ド の ヒン トー 


ソノ シー ト は 一 般 の グレ コー ド に 比べ て 薄 
vj, ダー ン ・ き デル に その まま 置く 
と , 反っ て し まう 場合 が あり ます . 

反っ だ た まま 再生 する と , レベ ル 変 動 や ワ 
ウ の だ め に , ロー ド が 上 難しく な っ て し まい 
E. 
反り を な くす に は ,。 ソノ シー ト を 乗せ る 
所 を 平ら に する 必要 が あり ます . ЖАЗУ 
ー ト (レー ベル の 所 が へ こん で いる ) を 取り 
外し て , 金属 の ター ン ・ テ ー デ ブル の 上 に 直 
接 置い た り , ソノシート の 下 に LP レ ュー 
ド を ひく の も 1 つの 方 法 で す . 

まだ ジノ シー ト は 。 6 5 ЕК9 0799 
な さく な ます: セロ テー プア SC SY 
ー ト を 固定 する 方 法 が 一 番 効果 的 で す が , 
レ ュ コード 針 を 傷め ない よう に, 充分 注意 し 
ате 
後 は , 普通 の レコ ー ド を 録音 する と き と 
КІСЕ ЗСІЗ ТУ 


編集 部 か ら の お 願い 


гул у], も 今月 で 9 回 目 と な り 5 
皆さん の ご 要望 の 多い , 長い プロ グラ ム を 
中 心 に 収録 し まし だ. 
ソノ シー ト に は , 皆さん か ら の リク エス 
ト の 多い も の を 優先 的 に 取り 上 ば げ てい きま 
TOT, 今後 , 収録 し て ほし い ブ ログ ラム 
や ゃ 機種 が あり まし だ ら お 知ら せく だ さい . 
また だ た, 引き 続き ロー ド の 状況 や . パン ツン コ 
ン D] の 内 容 に つい て の 感想 や 希望 が な ども 
ぉ 待ち し て な り ま す の で , 下記 の 要領 で 
PiO 編 集 部 に お 寄せ くだ る さい. 
今回 ロー ドミ きせ て み だ た プロ グラ ム 名 と ロ 
ー ド の 成否 . 
@ 使 用 機材 (アン プ , プレ イヤ ー, レコー 
ang E). 
⑧ ン ソノ シー ト を 再生 する と き の ア イデ ア , 


人 ぶ 後 ツノ シー ト で 供給 し て ほし い プ ログ 
CAR. 


ラム が あれ ば その 種類 ,. その 他 , 
ご 希望 を 書い て くだ る い 、. 
= b Ж 
8151 東京 都 渋谷 区 代々 木 1-37-1 
6€ vov 5E 


(株 ) 工 学 社 PiO 編 集 部 「 ソ ノシ ー ト 」 係 


(モモ ちゃ ん 好き の バイ ファ ム ) 


パソ コン DJ ソノ ン シート 


ナレ ー シ ョ 


SIDE A 

Kristin: Welcome to PiO's English World! 

Hi, everybody, this is Kristin, 

Karen:and this is Karen. We hope you all 
enjoy yourselves. 

Now, its time for our English lesson. Open 
your textbook, and go to Lesson9. Let's try 
the first paragraph, and pay attention to the 
new words and expressions. Here we go. 

2 :"10, 20, 30, 40, and 10AV". Do you know 
what this is all about? Yes, Hitachi's 51 
series! A new gizmo will join the 51° 
peripheral equipment to upgrade your sys- 
tem. An MPU card of 68000 family, MPU- 
68008, will be released in August at 40,000yen. 
21: This card has an internal 32-bit structure, 
and supports CP/M-68K of a single-user, 
single-task capability as its fundamental OS. 
All you need for this is an extension card of 
64K or more. 

Z:So, which word do you think is better to 
pick up? 

22: MPU, that's a good word to know. 

2:15 stands for a microprocessing unit. 

21: What a puzzling word! 

ク :But we love puzzles, don't we? Let's begin 
the first lesson on the S1 series, "PiO Puzzle." 
SIDE B 

カ : "Here is Chakonyan sleeping, and there 
comes the old stranger cat." This kind of 
sentence is called an inversion. Practice it in 
the "Miracle Ball" for the FM-7 series. 
Z2:Panic is caused by Pan, at least the 
ancient Greeks thought so. Nowadays, 
"Suido-kan Panic" is caused by ghosts. Don't 
panic, your PC-6000 series is always with you! 
SIDE C o 

2:"I want to be a blank.” Fill out the blank 
with an appropriate word meaning a space 
pilot. Don't miss it, or you'll be stuck in the 
"PUNK РОМ” for the PC-8800 series. 

ク :Do you know how to begin a letter in 
English? PASOPIA has instructions for you. 
Here's an example, Dear “CATHEY"… 
SIDE D | : 

カ :The letter from PiO to "CATHEY" 
continues; 'How are you doing with those 
cute little monsters? Please do not tease them 


| too much.' 


2:А purple stone is the prize when you clear 
the question on MZ-1500. Now, here it is; 
'How do you say "The Climber" in English?' 
Oops! I answered it myself... 

Z:That's all for this month. I think your 
English has improved tremendously. Your 
partners are Kristin, 

カ :and Karen. It's also the end of our stay іп 
Japan. We will miss this country a lot... 

2 :Let's hope to come back. Until then, live 
long and prosper. 

7): Bye bye. 


» 
レス DJ by Kristin&Karen 


A 面 
クリ ステ ィ ン シン: よう こそ PO の イン グリ ッシュ 
ワー ルド へ / こ ん に ち は , クリ ステ ィ ン で す . 


カレ ン : カ レン で す . きみ 今回 も 楽し ん で くだ 
さい . ST, 英語 の レッ スン の 時 間 で す . テキ 
スト は レッ スン 9 を 開い て くだ る さい. まず, Ж 
初 の パラ グラ フ か ら . 新しい 単語 や 表現 に 注意 
し て ね 、 で は 始め . 


0: Гүр, 20, 30, 40, £ L < DAV) - 6. 


何だ か 知っ て る ? 65, 日 立 の S1 シ リー ズ で 
す . S1 の 周辺 機器 に 新しい 仲 問 が 加わ り ま し 
た . 68000 系 の MPU カ ー ド , MPU-68008 が 8 
月 に 発売 され ます . 価格 は 40.000 円 . 

カ : こ の カー ド は, 内 部 32 ビ ッ ト 構 造 を 持ち , 
また 、 基 本 OS と し て 、 シ ング ダル ・ ユ エー ザー, 
シン グル ・ タ スク の CP/M-68K を サポ ー ト し ま 
+. 拡張 カー ド は 64 氏 以上 あれ ば 動作 が 可能 で 
T. 

5:85, КОМЕ С УУ 77У Б? 
カ :MPU が いい わ . 

ク : オ ー ケ イ , MPU は マイ クロ プロ セ シ ン グ ・ 
み ユ ネッ トド の こと て す 、 

カ : や や こし い 名 前 ね / 

ク : で も や や こし い パ ズル な ん か は 私 だ ち 大 好 
き で し ょ う ? それ じゃ ここ で 最初 の レッ スン , 
S1 シリ ー ズ の 「PiO パ ズル 」 に いっ て み ま し 
よう 。 

ва 

2: bh, 有 眠っ て る よ , チャ コ ニ ャ ン が 。 そこ 


へ や っ て 来 た よ , 見 知ら ぬ 猫 の 長老 が 」, こん _ 
な 文章 を 倒置 文 し いい ます . き て FM-7 シリ ー | 


ズ の 「 ミ ラク タク ル ・ ボ ー ル 」 て 練習 し て くだ る いし . 
ク : パ ニッ ク は 牧神 パー ン が 起こ す も の で ある . 


少な くし も 古代 ギリ シャ の 人 々 は そう 考え て い 


まし た . 現代 で は , MEI bat CHE у 
ク 」 を 起こ し ます . の も ノバ パニック に な ら な いて . 


PC-6000 シ リー は いつ で も あな た だ の 味方 で す . 


C 面 

2: RI に な り だ い 」 る て , この 文 の 
空欄 に 、 宇 宙 飛 行 士 を 意味 する こと ば を 入れ て 
くだ る きい 間違え な いで ね . まき さも な いと だ に 


9 9 2800 00006 


8800 シ リー ズ の 「PUNK PON」 で うう か え ち | 


ゃ い ます よ 、 


ク : 英 語 で 手紙 を 書く と き は ぼう や っ て 始め る 
PASOPIA が あな だ た に 教え て くれ ま 


Tuto» 
T. だ た と え た ば こん な か よう に . 

"Dear Г"САТНЕҮ; J. 

Dii 

カ :PBiO か ら 「CATHEY」 へ の 手紙 の 続き . 
『 例 の か わい らし い モ ンス ター だ た ちと は うま く 


いっ て いま すか . あま り い じ め ち ゃ だ めで す 


+ J. 


ク :MZ.1500 の 質問 を クリ アー し た ら パ ー プ ル | 
トーン か も 6 し ます 。 3 て 、 や っ て み 2 ま し 。 
ぅ .『 敵 語 で 「The Climber」 っ て 何 て 言い ま | 


すか ? gok, 自分 で 答え ちゃ っ だ ただ.… 


ク : 今 月 は これ で な し まい で す . 皆さん の 英語 。 
きっ と し と て も 上 手 に な っ た で し ょ う ね . 相手 


は タク リス ティン は t, 
3): 2 v > Ç L É. 
ЕБОТТ. 寂し く な っ て し まう われ th ね . 


ク : ま だ た いつ か 来 ら れる わ よ . で は その 時 ま с. 


末永 く 健やか に . 


ЖАҒА, 


私 た ちの 日 本 滞在 も これ で _ 


pos EEENSOEEERONONUMO0000000000000000000000000000000 


注 : ソ ノシ ー ト の 損傷 に よる 返 本 は 原則 と し て 受け 付け ませ ん . ご 容赦 くだ さい . 
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今月 の PiO な ゲー ム 


OPC-GOOO» 


Neo-BASIC-- 7788 


建ち 並ぶ 超 高 層 ビ ル , そし て その 地下 に 
は 全長 の 想像 も つか な い , 迷路 の よう に 入 
り 組 ん だ 水道 管 が 埋まっ て いる . 

ある 日 , どこ か ら 現 われ た の か , 無数 の 
幽霊 達 が 水道 管 に 住み つい た の だ . 水 は 止 
まり , 都市 は 大 混乱 に 陥っ た . そこ で あな 


た に 指令 が 下っ た .「 幽 器 達 を 除去 せよ 」 


Xece, 
H7n772^-(77z»*—a-v 


x ` | 複雑 な 迷路 や , 自分 の 弾 で 自分 が や 

x | られ て し まう と ころ な ど よ く で き て 

arsen いる と 思い ます 。 敵 キャ ラク タ に 。 
も っ と 変化 が ほし いで すね . (Т) 


3t E FE E E EE E PE Ê DÊ 9E 3 2Ê 《 る る < 


入力 方 法 


4t $532 20 95 36 25 2€ 35 26 26 96 $ 0€ < 
モー ド 2。 ペー ジ 3 で FC:6001 を スタ ー 
F ë ++ š +. 入力 の 前 に CLEARSO, & 
H9FFF を 実行 し て くだ る い 
まず リス ト 1 の BASIC を 入力 し , よく 
見 直し て か ら テ ー ヘ セー ジジ し ます 。 次 に 
リス ト 2 の マシ ン 語 を PiO モ ニタ (今月 号 の 
ООРУУ 
Жы ん 
АИ ОА RUN す る 


と マシ ン 語 を 自動 的 に ロー ド 後 。 タイ トル を 
表示 し ます . 
UN И 
363696969696 0€ 96 9€ 96 e 9€ € 
タイ トル の 表示 後 | SPACE | キー を 押す 
と , 画面 下 か ら 水 道 管 の 迷路 が 上 が っ て き 
て ゲー ム ・ ス タダ タート で す 。 

まず 画面 を 見 る と, 迷路 の 一 番 上 段 の 左 
端 か 右端 の 方 に 図 の の よう な キャ ラク 
A3»!'vid. これ が あな だ で す 。 ЖЕЛІНІ 
ЕСА ОЎ ОТС ОАТС. 

ЕЖ ІЗ 2 種類 いて , ファ イア ー ボ ー ル 
(400) と ゴー スト ( 図 の ③) で す . 274 


リー ズ 


ギ プ ブ ・ ア ッ プ 諸 ル ー チ ン 

迷路 の デー タ ・ ア ドレ ス 計 算 

キャ ラク タ ・ デ ー タ 仮想 画面 
迷路 デー ター 仮想 画面 
実 画 アド レス 

キャ ラク タ 表 示 16X16 ド ッ ト (1) 
スク ロー ル 

キャ ラク タ 表 示 16X16 ド ッ ト (2) 
キャ ラク タ 消 去 | 

仮想 画面 アド レス 計算 

仮想 画面 1 バイ ト ・ ロ ー ド 

あな た 移動 メイ ン 

あな た 移動 

ウォ ー タ ー ボ ー ル 発生 

座標 チェ ッ ク 

ウォ ー タ ー ボ ー ル 1 個 移動 

ウォ ー タ ー ボ ー ル すべ て 移動 
進め る か ? チ ェ ッ ク 

方 向 に よる 座標 変化 

モン スタ ー す べ て 移動 

モン スタ ー1 匹 移動 メイ ン ・ ル ー チ ン 
ゴー スト 移動 

ファ イア ー 移 動 

衝突 チェ ッ ク あな た と ウォ ー タ ー 
衝突 チェ ッ ク あな た と モン スタ ー 
衝突 チェ ッ ク モン スタ ー と ウォ ー タ ー 
BGM メ イン ・ ル ー テ チン 
BGM セ ッ ト , スタ ー ト 

BGM 割 り 込 み 制 御 

1 文字 表示 

10 進 表示 


アー は あな だ を 追っ て きま す .。 だ た だ アル デ プ 
リズ ム が よく な く て ,、 ひと と ころ を くる < く 
る 回 る こと が あり ます が , 気 に し な いで く 
だ さい 。 ゴー スト は ラン ダム に 動い て いま 
1. 

625 1 つ あ な た だ と 迷路 の 対 角 の 位置 に フ 
クレ ー ツ (?) が あり ます . あな だ が フル ー ツ 
を 取る と ウォ ー タ ー ボ ー ル が 撃て る よう 
に な り ま す 。 

ウォ ー タ ー ボ ー ル は 幽霊 達 を や っ つけ る 
唯一 の 武器 びす . フル ー ツ を 取っ た 後 , あ 
な だ が 横 方 向 を 向い て いて 前 が 空い て いる 
と きだ け , [SPACE | キー を 押す と 発射 き 
れ ま す . な お ボー ル は 無限 に あり ます が , 
画面 上 に 同時 に 3 つま で し か 出せ ませ ん . 
まだ ボー ル は , 幽霊 に 当たる まで 消え た ませ 
^. そし て 前 進 で きる 場合 は その まま 前 進 
L, 左右 どちら か 一 方 だ け 行 ける 場合 は , 
その 方 向 へ 曲がり ます . 左右 両方 へ 行け る 
場合 は どっ ち へ 曲がる か わか り ま せん か 


5, 気 を 付け な けれ ば 自殺 する こと に な 5 . 


ます よ . 


僕 も 2 一 3 年 前 に 似 た よう な (?) こ と が あり まし た . 


ボー ル が モン スタ ー に 当たっ た 
スコ ア 表 示 

文字 列表 示 

タイ トル 表示 

ハイ ・ ス コア 表示 
LEFT 表 示 

死ぬ デモ 用 キャ ラク タ 表 示 
音楽 演奏 用 

死ぬ デモ 

面 デ ー タ ・ ア ドレ ス セ ッ ト 
あな た 初期 位置 セッ ト 

モン スタ ー 初 期 位 置 セ ッ ト 
フル ー ツ 位置 セッ ト 
フル ー ツ 表示 

フル ー ツ 取っ た か ? 

初期 設定 1 

初期 設定 2 

初期 設定 3 

ウェ イト ・ ル ー プ 

メイ ン ・ ル ー チ ン (1) 

初期 設定 4 

メイ ン ・ ル ー テ チン (2) 

あな た ウォ ー タ ー ボ ー ル 消去 
モン スタ ー 消 去 
作者 名 表示 

タイ トル 用 円 表示 
USR セ ッ ト 

モン スタ ー フ ラグ ・ リ セッ ト 
HIT SPACE KEY 表示 

ギ プ ・ ア ッ プ 諸 ル ー チ ン 


Ж2 ワー ク ・ エ リア 


迷路 番号 

あな た の キャ ラク タ 番 号 
あな た 位置 

ウォ ー タ ー ボ ー ル 最大 数 
スペ ー ス キー 757 
敵 総数 

OUT フ ラグ 

BGM カ ウン タ 
BGM フ ラグ 

スコ ア 

LEFT 

ハイ ・ ス コア 

面 デ ー タ ・ ア ドレ ス 


面 数 
フル ー ツ 位置 
タイ ム 


友達 と 2 人 で 自転 車 を 並べ て 走っ て た ん で す . する と 


© TO) 7 月 号 p.176 の ぴぃ えす さん . 
Ол Ол へ 、 突然 を の 友達 が か が ぎの で っ ぱっ て る と ころ を けっ た ん で す 。 ガチ ャ ン と いう 音 と と も に スポ ー ク が 数 本 折れ , それ で も 後 輪 が 持ち 上 が っ て 空 
中 1 回 転 (?)、 も ちろ ん 僕 は 放り 出さ きれ ま し た . PS1 荒川 区 の 人 は よ け て や っ た ら わ ざわ ぎ 突 っ 込ん で きた り 。 前 を 通 ろ うと し た 6 道路 


Ы を 渡る ふり を し て 止め る せ だ た り , や る こと が 陰険 だ . Р52 その 後 修理 代 を が っ ちり 取っ た こと は 言う まで も な い . (し いた け ヨ ー グ ルト ) 


ルト 


それ で は ゲー ム の 仕方 で す . まず 最初 に 
あな だ の し な けれ ば いけ な いこ と は , К 
を 避け な が ら な る で くく 早く フル ー ツ を 取る 
こと で す . まだ あま り 取 る の が 遅く な る と , 
あな だ は 死ん で し まい ます 。 

フル ー ツ を 取っ だ な ら , ЖӘ HRE r FF 
っ 端 か ら 退 治し て くだ さい . 幽霊 は ウォ ー 
ター ボー ル が 2 発 当 だ た る と 小さ く な り ( 小 
さく な っ て も 捕まっ て は いけ ませ ん ), 55 
2 発 当 て る と 消 ん て くれ ます . 結局 4 発 当 
БЕШЕ Т この よう に じ て ず ざ そ の 
HX ij E, 1 面 ク リア で す . そし て 8 
面 ク リア する と 二 プ ブッ プ ・ デ モ が あ ヶ り , 
ゲー ム * オ ーッ パー に な b ます 。 

幽 圭 に 捕まる と あな だ は 転び , LEFT»? 
1 つ 減 り ま す . LEFT が 0 に な っ だ ら ゲ ー 
ム ・ オ ー バ パー です. な お 幽霊 が 小さ きく な っ 
だ と き な ど , 特に 曲がり 角 な ど で は 近付い 
だ た だ け で 死ぬ ね こと が あり ます の で て 気 を 付け 
て くだ る い 。 


FÊ Ê 2Ê Ê 0€ 04 56 90 Ê 0€ 0€ 80 0606 4 26 1 


ゲー ム の コツ 


1638 22 258€ 2028 36 Û Ê 06 063€ 6 06 060€ 


高 得点 の だ た め に は , 敵 の 動き を 知る こと 
が 大 切 で す 。 と は 言っ て も , 敵 の 動き に は 
ice petii EE な か な か つか み 
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Аао90:16 ӨӨ € 26 о5:29 
G698:FF ©5 2 O5: SO 
ААО: FD 01:Ғ4 
AGAB: 60 .14:5C 
AGBO: oz @5: 186 
АФЕВ: FE 01:02 
десе: ea O1:EE 
07: ВС 
F7:F95 
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ED: E2 
QS: CD 
09:45 
FCsFD 


АСВ: FF 
Аре: FF 
AEDB: FF 
AGE: Әр 
АФЕВ: 7Е 
AGF: 32 
noFB: 04 


ね ら っ て 撃た な いと , な か な か 当たら な い ぞ / 


Et 4 DO} が …・. 

テク ニッ ク の 例 を いく つか あげ て み ま す 
OC. DEU TAIC SY, | 
⑯ フ ァ イ ア ー の 場合 

うま く 誘 導 し て 1 つ に 重ね て , 一 気 に や 
っ つけ る 。 

直線 コー ス を ダッ シュ し て 問 を 開き , А 


b 返っ て 数 発 連 射す る こと を 繰り 返す . 
@ デ ゴー スト の 場合 


一 本 道 の 部 分 が 続い て いる と ころ へ 入っ 
だ と き に , ウォ ー ダ ター ボー ル を 連発 する. 

も う 1 つの コツ は , йезе ИГ 
LC34. 大 抵 の 面 で は , ウォ ー タ ー ボ ー ル 
が 絶対 入っ て こない と こ ろか が 何 箇所 か あり 
ます そく か ら 攻 撃 す れ ば , 自滅 する 心配 


は あり ませ ん . 
リリ スト 1 水道 管 PANIC BASIC リ スト 


418 EXECX&HAE4S8:EXECXLHAE7Sg 

428 IFPEEKC&HBFBF? GOTO148 

508 LINEC48,72» -C215,155» ,0,BF:L 
INEC48,72» -C215,159» ,1,B 

518 LOCATE?,7:PRINT" GAME 0 

ЧЕ В" 

528 SC-PEEKCK&kHBFaC? *PEEKC&HBFAD? 

X2546:HS-PEEKC&kHBF 18» + PEEKC&HBF 11 

X296 

S30 LOCATES,9?:PRINT"YOUR SCORE:" 
:SC"8" :LOCATES6, 10: PRINT"HIGH SCO 

RE1"1H$ "9^ 

548 IFSCZ»HSTHENLOCATE?,11:PRINT 
"YOUR. SCORE IS VEST!":GOSUBóG0 
558 PLAàv"SaM2849LSCERSDCERSDGFED 
C" FER 

Sé IFPEEKCXHFD1B» ТНЕЧ5 &0 

S578 ЕХЕСЫНАЕҒ 10 

S34 IFSTRIGGOà)5 THEN ій 

598 FüRI-aTO18:MEXT:GOTOS?8 

444 H=INT (807/254) 1L 2SC-HX256:X-8 

HEF 18 

610 POKEX,L:POKEX*1,H: RETURN 
1880 FORIZ&HFS7STO&KHFSD1:READ62A* : 
POKEI,'JALC"XH"*à£$»:NEXT 

1818 EXECKkHFS?S 

1188 СОАТЕЙЙ, 00,00,00 ,С0, 9А, 25,04 

o, 1А, FE ,AF 。 20 ,F? 

DATA18,F7,21,32,F8,805,05,CD 

,16,77,29,198, F9, ср, Bë 

DATA 18, ,4Ғ,32,38,Ғ8,21,74,25 
Ғ,90 (Z | 96 ,FS8,CD, CF 

DATA38, oS онага Бо 

‚46,34, ЕВ, 1E ,98 。 CD,78, 

1184 DATA57?7,8983,5F, I i es; Бі 


о © YO 
юз 


いい 
po > 


m С) — ` 


Alo: ҒА 
A108: o8 


A110: QB 
^5118:02 
А120:00 
A128: OF 
В150:ЕҒ 
А158:01 
A140: 01 
A148: E7 
A150: ЕС 


くく くく くく くく くく くく る くく くく 


プロ グラ ム に つい て 


XNXXXXXXXXXXXXXXX 


: 迷路 の デー タ 

迷路 8 面 の デー タ は , B500H >> 6 1 TÎ 
160 バ イト ずつ 入っ て いま す . 1 バイ ト は 
上 下 4 ビッ ト ず つ 分 か れ て いて , 上 位 が キ 
ャ ラク タ 番 号 , 下位 が 進め る 方 向 を 示す デ 
ー タ で す : 

各 面 ご と に , まず A418H か ら の ルー チ 
ン で 仮想 画面 (DC00H) へ 上 位 4 ビッ ト を 
下位 ピッ ト へ ずら し て , 転送 し ます . そし 
て A478H か ら の ルー チン で 迷路 を 表示 し , 
A430H か ら の ルー チン で デー タ の 下位 4 
ビッ ト だ け を 仮想 画面 に 転送 し , ゲー ム に 
使い ます . 

2 : キャ ラク タ を 動か す 

キャ ラク タ 々 タ の 座標 X, Y ど ちら か が 奇数 
の 場合 は , 以前 と 同じ 方 向 か , 正反対 の 方 
向 へ 進め る こと に な り ま す . 

X と Y が どちら も 偶数 の 場合 は , 仮想 画 
面 か ら を の 座標 に 対応 する 値 を 取り 出し ま 
+. その 4 ビッ ト そ れ ぞ れ に 上 下 左右 を 


割り 当て , その ビッ ト が 1 か 0 で その 方 各 . 
ІП ӘЗИТЖЕКТІ ET. 


Бе Ср ДА, уш аре КЕЙ. 


rue 
C C — hl 


> (O tJ Ol t P — m > Tm > ° 


C C c C Om (nom m oc O Q. 


SCREEN4,2,2:COLOR1,80, 1:C 
HAE DE 
POKE&HBF 28 ,$:H?8 : POKE&HBF21, 


ys iar Yz12:60S5UB4888 
=80 :Ү=22 :; 50Е0640080 
Xe 1541Y2321608U54000 
LOCATEO8 ,8 : PRINT"PANIC" 
2-ыназғв 
FORJZITOS9:FOÜRI-ZITOSS 
IFPOINT&I,J? THENGOSUBSS88 
NEXT :NEXT 
COLOR : РРІЧТСНЕФ С 11) "PANIC" 
iCOLOR 1 
LOCATE2,6:PRINT"1 Li 
LOCATE12,7:PRINT" z" 
LOCATE21,S:PRINT"tb 
LOCATESB,138:PRINT"B v 
EXEC АБАЙ: RETURN 
2500 x-IX5*40-J:Y-JX441604 
2772 POKEZ,Y:POKEZ*1,X: EXECEHASF 
: RETURN 
mee Н=0$Е Н> :У=058 40) :ТЕН=@АМр 
-üTHEN4188 
4018 PS ETCH*X,'J*Y5 
4828 H-USRCH? t'/zUSRCUD i IFH=12?TH 
ENA A 
4838 (ІМЕ-5ТЕР(Н,М2 FGDTO44 20 
4188 HzUSRH?: 1FH= 127THENRETURN 
4185 いり =USRC り > :PAINTCH*X,Y M5 ‚1,1 
:50704108 


S Co ® CO CO Q Q ToC X 


20:91 
оо: 25 
od: CF 


A158: 45 
A160: 1F 
A1648: FC 
A170: 0S 
A178: 95 
0186: 02 
0188: 18 


0190: Өз 
8198: 96 
аід: 07 
A1A8: FF 


Pio 


リリ スト の グ 水道 管 PANIC 


A1BO:FD 
A1B8:00 
ісе: ер 
A1C8: 08 
A1D6:02 
^1D8: өз 
A1E@:FD 
A1E8: 95 
A1FO: 1E 
A1F8: 04 
A200: өз 


マシ ン 語 リス ト 


7Ғ: 


А210:91 
A218: 07 
220:11 
A228: FC 
А250:Ғр 
А258: ӨЗ 
A240: 00 
А248:04 
А250:ҒҒ 
a258:FF 
A260: 04 
A268: 99 
A270: FE 
A278: 7F 
A280: F4 
A288: OE 


A290: 7F 
A298: 19 
А2А0:22 
А>АВ:250 
A2B0: 45 
a2B8: 52 
AZC: 45 
A2C8: 21 
A2D0: ЗЕ 
A2D8: A3 
А2Е0: 32 
A2E8:FD 
А2Ғ0: 23 
A2F8:E2 
a3eóo0: ЗА 
А508: BF 


ーー 


A310: 3A 
AS18:FE 
аз2о:се 
A328: DÖ 
A330: АӨ 
A338: CD 
A340: 80 
A348: өө 
AZIO: 20 
A358: 50 
A360: 55 
А568:49 
АЗ70:21 
A378: A3 
A382: CD 
A388: 68 


208 C7 
92: 36 
оо: 6B 
Se: SB 
60:63 
dé: 4C 
А4: ЗЕ 


— — — — — — — — n — —— — — nr — шш — — — — — — r 


5А 


A390: 3A 
A398: 10 
AZA: 9D 
АЗАВ: 41 
ахво: 38 
A3B8: 00 
Q3C9』F6 
AZC8: ВЕ 
ASDO:EA 
A3D8: АФ 
АЗЕФ: Ср 
АЗЕВ: АЕ 
SF の Os 19 
AZFB8:8C 
A400: ЗА 
A408: 29 


A410: 01 
A418: CD 


A420: OF 
A428: 10 
A430: CD 
A438: OF 
A440: 4C 
A448: 29 
A454: CD 
4458: 13 
A4643: 49 
A468: ES 
A470: 29 
A478: DD 
04860: の 9 
A488: өө 


A490: 25 
A498: 94 
А4А@: 01 
A4A8: C1 
даве: CD 
А4В8:77 
a4Cóà: 1F 
A4C8: CD 
А4ро:77 
A4D8: 1F 
A4EÖ: CE 
А4ЕВ: де 
A4FG: ES 
A4F8: 2A 
ASO: ЗЕ 
А508: ЕЁ 


а510:10 


` A518: 04 


a520:4F 
A528: BF 
А5509:С9 
А558:22 
А5409:Е6 
А548:Ср 
А5590: 02 
A558: 06 
А560:ҒО 
А568:ВҒ 
А579: EE 
As78: CD 
As80: ов 
a588:99 


C7:0A 


FE: BZ 
CB: 65 
61:54 
BF:87 
24:28 
②1 CC 
C9:94 


22199 . 


F6:98 
CD: 7D 
O2: D7 
04: 9A 


A590: E6 
4598: o8 
AJAG: AD 
ASAB: o4 
ASBó:11 
ASB8:44 
ASCO: 26 
ASC8:80 
ASDO: Bo 
ASD8:86 
ASEO: 47 
ASE8: BF 
ASFO: a1 
ASFB: 28 
Адо: Fa 
A608: де 


11:04 
C さ s ED 
E6:78 
60:64 
05:43 
ЗА: C4 
A7: SF 
CD:F7 
OO: CO 


A610: Ғе 
A618: 68 
А20: 24 
A628: DD 
AGIO: 24 
A638: 36 
A640: 75 
A648: C3 
А650: ӘӘ 


А658:7С 3 


A660: дё 
A668: 3D 
А679:32С 
А678:рр 
A6480: АФ 
^688: ӨЗ 


ВС:28 
09:17 
OO: ӨӨ 
28: С3 
7D: 13 


a 


A690: 43 
А698:Е1 
AGA: FE 
A608: 25 
AGBO: 0601 
^6B8:11 
Аса: C3 
A6C8: 03 
A6DO:E1 
A6D8:FE 
АФЕӘ:ҒЕ 
A6E8: 25 
АФҒӨ:18 
А6ҒВ: ӨЗ 
07600: 02 
0708: CD 


A4: 6E 
OB: 6F 
09:64 
18:С9 
3: DS 
E1: 54 
66:06 
А4:6Е 
ӨЛ:ЕЗ 
12:70 
48:C1 
24:E8 


ーーーーーーーーーー ーー ーーーーーーーー ーー‏ < ت س 


Sum: CD 


071e0:C8 
A718: o0 
A720: 56 
A728: 1 1 
7380:ED 
A738: 28 
4740: RD 
A748: 43 
A754: DD 
A758: ED 
A760: 28 
A768: EC 
А77®: 01 
778: 36 
47890: DD 
5788: 66 


A790: дө 
А798:Ғ5 
а7а0: 28 
А7АВ:28 
A7BO: CE 
A7B8: 28 
47Cà:37 
A7CB8:FE 
A7DƏ:FE 
A7D8: 2D 
А7ЕФ:Ср 
А7ЕВ: 96 
A7Fa: АВ 
A7F8:F4 
ABOG: BF 
авав: DD 


00:74 
91:80 
O3: 6F 
10: Ві 
58: 84 
92:91 
@1 CC 
08:61 
С9: дА 
дд: ЕВ 
ЗА: ФА 
08:15 
19:65 
O08: 1E 
оо: 88 


------.-.............................................. Т ーー ーー ーー 


a816:DD 
A818: SE 
A820: A7 
4828: DD 
A830: BÖ 
A838: 29 
A840: 1E 
6848: DD 
A856: DD 
A858: E6 
0866: 98 
AB68:C3 
4870: А7 
A878: 02 
A880: SF 
6888: の 7 


ーー — — M — — — n ーー ーー 


A890: CB 
A898: 2C 
ABAS: 56 
АВАВ: SF 
A8B6: 07 
АВЕВ: CE 
ABCO: 24 


ABC8:DD 2 


A8DÖ: DD 
A8D8:E6 
ABEG: DD 
ABE8: ЗЕ 
ABFA: Зе 
ABF8: АВ 


А5900: A7 2 


C3: Bé 


を ど どん ば 大 橋 近 況 報告 . 私 ( 広 鳥 出身) は この 春 大 学生 ( 某 理 科大 学 ) に な り ま し た が , その 大 学 で な ん と あの 野沢 せ ー や さる ん (静岡 県 出身 ) と 
同じ クラ ス に な っ た の で す . 同じ PiO で デビ ュー し た 2 人 が 岡山 で めぐ り 会 え を る な ん て , これ ほど うれ し い と と は な いじ ゃ ー な いで すか 。 c 
れ か ら の 2 人 の PO ライ フ は も っ と 充実 する で し ょ う . 


(岡山 市 と いえ ば 快 人 さん の いる 倉敷 が 近かっ た と 考え る どど ん ば ぱ ば 大橋) 


A908: 1E 


46 O2:E6 


A910: B8 
6918: CD 
A920: 02 
4928: eC 
ag3e:o1 
8938: o0 
09460: DD 
0948: 66 
А950:10 
6958: 58 
49660: ВЕ 
n ワ 68sE1 
A970: DD 
A4978: の 6 
0980: ӨӨ 
A988: 56 


A990: o1 
A998: 09 
AJAG: DD 
0968: 98 
А9ве: DD 
A9BB8:FD 
a9ces: 47 
A?C8:FD 
a9De: CD 
А9р8:91 
AJEG: o1 
a9EB: C9 
А9ҒӘ:ЗА 
A9F8: BE 
ААда: DI 


AAGB: AO 


Sum: 160 


AAL: АФ 
A018: AF 
АА20:20 
АА28: 00 
aae: 40 
ААЗ8:99 
AA4G: CI 
AA48: 28 
aaSe:38 


АА58: А5 - 


АА6О:ЕЗ 
АҺ68:11 
АА70:92 
A078: ЗА 
aage: 54 
AABB: 29 


Aa9o: o1 
АА98:10 
AAAG: DD 
АААВ:СЗ 
AABO: ӨӨ 
AABB: 42 
AACA: 10 
ААСВ: ӨЗ 
AaDe: ES 


AAD8: D1 ` 


AAEG: DD 
ААЕВ:В7 
AAFG: 7E. 
ААҒВ:77 
ABOG: АҒ 
ABOB: оо 


АВ19:11 
АВ18:36 
АВ20: ӨЕ 
АВ28:21 
AB3O: BF 
АВ58:20 
AB460:34 
АВ48: 7E 
ABSG: F7 
ABSB:21 
ABéG: R4 
 AB68:21 
АВ7Ә:ВЕ 


BF FD:46 
5С 52:АВ 
oo GO: 3E 
20 00:27 
24 20:89 
4С 36:92 
O0 QOO:E2 


АА 18:FF 


ос oO:F7 
21 CO:CB 
оо GO: 3D 
20 10:37 
ос GOO: 9F 


АВ78:21 
ABBO: BF 
AB88: 22 


ABO: 22 
AB98:22 
ABAG: DS 


АВАВ: CD 


ABRBEO: 7E 
ABB8: A7 


ABCO: ЗА 


ABC8: 78 
ABDO: 21 
ABD8: B4 


ABEOG: БО: 


ABE8: 21 
ABFO::3A 
ABF8: 4D 
ACOG: E 


ACOB: 2A 


ACIO: Өз 
AC18: 00 
AC20: RF 
АС28: 11 
АС5Ә: 32 
АС58:12 
АС40: 23 
AC48: EC 
ACSe:11 
AC58: 92 
АСёё: ЗА 
AC68: 29 
АС70:2 

AC78: 2A 
acse: co 


АС88: 64 ` 


АС90: ac 
AC98: 59 
acae: 34 
АСАВ: 66 
ACEO: 19 
ACE8: OF 
ACCO: 32 
АССВ: BF 


ACDO: ZA 


ACD8: 32 
ACEG: А4 
АСЕВ: 52 
RCF9』 CD 
АСЕВ: 21 


aDee:aF 22 


А0608: 17 


ADIO: ёё 
А018: 16 
Ар20:47 
AD28: 02 
ADZO: AF 
AD38: CD 
AD40: ВЕ 
AD48: A9 
ADSG: AD 
AD58: BÖ 
ADG: 3A 
AD68: CD 
^D76: AD 
AD78: 47 
А089: 70 
А088: 160 


Арѕе: CA 
AD98: 2H 
ADA: 20 


` ADAB: CD 


Арво:2А 
ADE8: さじ 
Арсе: 3c 


nDCB 22 


ADDG: CD 
ADD8: BF 
ADEQ: A7 


дө: 24 
25:21 
52:74 
5С:38 
OC: 54 
C9: D4 
50:62 
78:05 
AF: SC 


Pi O 


リス トク 2 水道 管 PANIC マシ ン 語 リス ト 
ADEB: CO 
ADFÖ: AG 
ADF8:10 
AEG: 3A 
AE@Bs CD 


aE10: BF 
ВЕ18: А5 
АЕ20:СӨӘ 
АЕ28: 40 
AEZ: EO 
AE38: 3A 
aE460: 40 
AE48: 2A 
AES: А4 
АЕ58:21 
AE: 66 
AE68: 11 
АЕ7@: С9 
AE78: 3A 
АЕВо: 20 
AE88: ӨС 


АЕ9@: BO 
AE98: DD 
AEA®: 21 
АЕАВ: CS 
AEBO: 16 
AEBBs 16 
aECes: CD 
AECB: 22 
AEDO: 19 
МЕРВ: 21 
AEEO: 11 
AEE 日 32 
AEF@』 13 
AEFB:13 
AF@ の i 21 
АҒӨВ:С9 


AF10: ЗА 
AF 18: ВЕ 
AFZ0: 26 
AF 28: FD 
AF 30: DD 
AF 38: 41 
АЕ49: 1% 
AF 48: 28 
AF S0: 28 
AF S8: ЗЕ 
AF60: 59 
AF68: DD 
AF 74: DD 
AF78: 87 
AF80: I0 ` 
AF88: DD 


АҒ9Ө:01 
АҒ98:18 
AF AG: DD 
AFAB: C8 
AF EO: oo 
АҒВВ: зА 
AFCO: 91 
АҒСВ: BF 
АҒре: рр 
АҒрВ: 36 
АҒЕ@: 77 
АҒЕВ: 22 
AFFO: 21 
АҒЕВ: 40 
воде: F3 
BOOB: ЗЕ 


BO10: CS 
BO18: C4 
BOZO: ЗА 
BO28: AF 
Be3o:7C 
BO38: СЕ 
BO4G: 47 
BO48: 29 
BOSG: DS 


piO 


B969』 77 
В068:19 
ве7е: рр 
BO78: 66 
вово:Ср 
BO88: 10 


BO90: 3C 
BO98:721 
воде: 59 


BOAB:95 3 
BOBO:EX 3 


BOBB: 44 
Весо: A3 
BOC8: 93 
вере: 74 
верв: 37 
BOEÖ: 73 
ВӨЕВ: AA 
BOF G: 4Q 
BOF 8: 9F 
В100:76 
B108: 39 


B1160:84 
B118: 53 
B120: SB 
В128:А6 
B1 34: SE 
E138: CO 
B140: АФ 
B148: AS 
В150: A4 
B158: A3 
B160:C1 
B168:B1 
В170:87 
В178:90 
B1860:94 
B188:41 


B190: 20 
B198: 20 
B1400:48 
B1A8: 45 
B1B: 48 
В1В8:45 
В1С9:48 
B1C8: 45 
віре: 20 
B1D8: 20 
B1E0: FF 
B1E8:FC 


BiFO:FF 3 


B1FBsFC 
В200:7Е 


B210: 7E 
B218:F8 
B220: 3F 
B228: F8 
B230: 1F 
B238: F8 
B240: OF 
E248: F8 
B250: 07 
B258: F8 
B260: 03 
B268: F8 
B270: 03 
B278:F8 
B2860: Q3 
B288: F8 


B290: 43 
B298:F8 
BZA: O3 
B2A8:F8 
В2В0:97 
B2BB:FC 
B2C60: 07 


B2C8: FC 
B2D6: の 9 
B2D8: 00 
B2EQ: の 9 
B2EB8: 00 
B2F6:15 
B2F8: OF 
ESO: の の 
B308: 38 


—— — — — — — — — — — — — — ———-———————————————— 


В510:1В 
В518:01 
B326: 00 
B328: OF 
B330: JE 
B338: 06 
В540: 00 
B348:01 
В550: 07 
B358: 03 
B360: の 9 
B368: 00 
B370: 3C 
B378: 06 
B386: 00 
B388: IC 


B390: ЗЕ 


B398: の 9 
BIAG: дө 
B3A8: OF 
B3BO6:2E 
B3SB8:07 
BICO: дө 
B3C8: SF 
BSD@: ZF 
B3D8: OF 
ВЗЕФ: 01 
B3E8: 01 
BSFO: の 9 
B3F8:00 
B400:12 
B408:01 


B4160: 02 
B418: 60 
B420: o0 
B428: 160 
B430:02 
B438: 01 
B440: OC 
E448: 1E 
B4560: 12 
B458: 02 
B460:01 
B468: OE 
B470: GE 
B478: 64 
B480: 40 
B488: OF 


-Л- ---- — — — — — — — — — — — — — = — — r — —— — 


B490: 1D 
B498: 20 
B4660: дё 
B4AB 07 
B4B: 07 
B4B8: 61 
васе: 2A 
B4C8: FD 
варе: 2A 
B4D8: 20 
В4ЕӨ 53 
B4E8: 30 
B4F6: 48 
B4F8: 20 
в5оо: дө 
В508:56 


В5109:45 
B518: BF 
B520: 1C 
B528r1C 
B530: 39 


B538: BF 
B540: o0 
B548: 1C 
B550: 45 
B558: BF 
B560: 1C 
B568: 1C 


. B570: 39 


B578: BF 
B586: до 
B588: 39 


BSAG: の の 
В5АВ: 00 
вве: 45 
BSB8:23 
В5СФ:59 
BSC8:23 
BSDO: 00 
BSD8: の 9 
BSE6: 45 
BSEB8:23 
BSF9s 1C 
BSF8:23 
B600: 59 
B608: 23 


B610:45 
B618:23 
B620: 1C 
B628: 45 
B630: 39 
B638: AE 
B640: дө 
B648: 56 
В650:45 
В658:1С 
B6660: 1C 
B668: АВ 
B676: 1C 
B678: の 9 
вве: 1C 
B688: 45 


B696: 1C 
B698: 1C 
BoAG: 1C 
B6^8: 1C 
BORO: 39 
B6B8: 1C 
BACO: 40 
B6CB: 1C 
вре: дө 
B6D8: 6A 
BAE G: 40 
B6EB: ОО 
BAF 6:45 


B6F8:23 2 


B700: 1C 
B708: 23 


B710:39 
B718:00 
B720:45 
B728:45 
B730:1C 
B738: 1C 
B740: 39 
B748: BF 
B750: 45 
B758: 1C 
B760:1C 
B768: bA 
B770: 39 
B778: 23 
B780:45 
B788: 56 


B790: 1C 
B798: БА 
В7А@: 1C 


56: BB 
00:54 
1C: 9C 
23: 0E 
6A: CF 
60:70 


90: EA 
9E:76 
56:92 
1С:51 
1C: АВ 
1C: 3B 
7D:EF 
1C: BF 
60:58 
1C: DO 
23:09 


p ZEPLIS 1 FARE!!! いや ー, さす が に 疲れ まし た . 6 時 間 ほ ど や っ た で し ょ うか . Hhh5 64-7 b LT, 目的 は 達成 し た の で 
途中 で や ゆめ まし だ が …. Н? 1 千 万 点 で し た Hi 面 数 は 3 周 目 の PARSEC 6, ROUND 5 で す . x? 邪道 で も 使っ た ん だ ろう で すっ 
C? と ん で も な い / 完全 な 正攻法 で で す よ . іу, 1 千 万 点 く らい は , いっ て る 人 が いる と は 思い ます が . 追伸 SHINING SPACE 
e OD?) TIZET 5 š TAI b OTF (105~ 6 面 位 ?) Hi, 2 時 間 も か け て ネ . ホン ト , ヒマ ダネ ェ . 


В7АВ: 00 
B7B6: 1C 
B7B8: 45 
B7C6: 1C 
B7C8: 1C 
B7D6: 1C 
B7D8: 7D 
B7E6: 1C 
B7E8: 39 
В7ҒӨ:1С 
B7F8: o0 
EBOG: 39 
B808: 23 


B810: 00 
B818: 23 
B826: 00 
B828: 23 
BB さ @』 45 
EB さ 日: 45 
B840: 1C 
.B848: 1C 
B856: 1C 
B858: BF 
BB69』 39 
B868: BF 
B876:45 
B878: BF 
B880: 39 
B888: 1C 


Sum: 34 


B896:45 
E898: 6A 
ЕВАО:1С 
B8A8:23 
B8E6::39 
B8B8: 66 
ЕВСО:45 
BS8CB8: 45 
BODO: 1C 
B8D8: 1C 
BS8EO0: 7р 
ЕВЕВ: BF 
BS8Fo:1C 
ЕВЕВ: AE 
B900: 39 


В910:45 
В918:00 
B920: 1C 
B928:87 
В950:70 
B938: BF 
.B946: 1C 
B948: 1C 
B950: 39 
B958: 39 
B9660: 45 
B968:87 
B9760: 39 
B978: 7D 
B98o: 45 
B988: BF 


B990: 7D 
E998: AE 
BE9a9』 7р 
B9A8: 60 
B9BO:29 
B9B8:87 
B9CƏ: 45 
B9C8: BF 
B9D6:7D 
B9D8: ВЕ 
В9ЕФ: 7р 
B9E8: ВЕ 
EFO: 39 
E9FBs AB 
BAGG: oo 
BA68: 60 


вВА10:00 


oo oo 


(天下 御免 の 退屈 Boy( ふ 。 5.5--.1?)) 


56:20 
1С:06 
EF : 4A 
1C: 44 
BF:07 


BA18: の 9 
BA20: 860 
BA28: 86 
BA36:80 
BA38: 860 
BA40:FF 
BA48: 00 
BASO: ao 
BASB8: 99 
BAGG: 809 
BA68: 86 
BA79:89 
BA78: 80 
BA86:7F 
BA88: 86 


BA96:80 
BA98: 86 
BAAe:FF 
BAAB: Фе 
Ваве: ө 
BABB: до 
BACO: ОО 
BACB: 99 
BAD: G0 
BAD8: Фе 
BAEO: 80 
BAE8:80 
BAFe: 8e 
BAF8:80 
BROG: FF 
BROB: Фо 


BB160: 40 
ВВ18:00 
BE の Oi 00 
BB28: の 9 
BB36: の 9 
BBR38: 99 
BB46: の 9 
BB48: 99 
BEJO: ОО 
BBS8: 60 
BEGG: дө 
BB68: の 9 


` BB70:00 


BB78: 00 
BEBO: 40 
BB88: 1B 


BB96: SE 
BB98: 28 
BBA6: оо 
BBA8: 1B 
BEBÖ: 3B 
BBB8: ©1 
BECO: の の 
BBCB:1F 
BEDQ: ZF 
EBD8: 98 
ВВЕО: ОО 
BBEB: 1F 
BBF ©: ЗЕ 
BBF8: 61 
BCo6: дө 
ВСВ: 1F 


ВС10:2Ғ 
ВС18:00 
BC260: o0 
BC28: 1F 
BCSO: SF 
BC38: 44 
BC46: 99 


BC48: 1F 


BCS: SF 
BCS58: 00 
BCó66: дө 
BC68: 1F 
EC79』 SF 
BC78:04 
BC86:FF 
BC88: 86 


40:39 
00: 48 
EO: Ró 


eu 


リリ スト 2 水道 管 PANIC マシ ン 語 リス ト 


ВС909:80 
BC98:860 
ЕСА@: ОО 
EBCAB8: ӨЗ 
ВСВ0:15 
ВСЕВ:91 
BCCO: の の 
BCC8: OF 
BCD6o:19? 
BCD8: OF 
BCEG: дё 
BCES8: 60 
ECF: ODN 
BCF 8: OF 
Еред: oo 
BD68: ÖF 


BD19s1F Š 


BD18i ZF 
BD26: дө 
BD28: 99 
EDIO: OF 


| BD38: OF 


BD49: өө 
BD48: 9F 
BDSG: 1F 
BD58: 1F 
EDAG: 66 
BDAB: 66 
BD76:0F 
BD78: OF 
EDB9: өө 
BD88: OF 


BD96:19 
BD98: 1F 
EDAG: ёё 
BDA8: 66 
BDERO: QD 
BDEG8: ФЕ 
BDCÖ: де 
BDC8: 07 
врре: зв 
BDD8: 1F 
EDEG: ӨӨ 
BDE8: оё 
BDF@: @7 
BDF8:07 
ВЕОО: ОО 
BEOB: ФЕ 


BE19』 OF 
BE18:07 
BE20: 00 
BE28: の 9 
БЕЗӨ:ӨЗ 
BE38: 03 
BE46: ОО 
BE48: 03 
BES: OF 
BESS: OF 
BEGG: ОӘО 
BE68: ОО 
BE70: 97 
BE78: 07 
BEBÖ: ое 
BE88: 03 


Sum: 4E 


ВЕ9@: ØD 
BE98: OF 
BEAO: ӨӨ 
BEAB8: 99 
EERO: 07 
BEB8: 07 
BECO: ЗЕ 
BECB8: ЗЕ 
ВЕре: 65 
BED8: 65 
ВЕЕФ: 7B 
BEES: 7H 
BEFG: A9 
BEF8: ЗЕ 


O3: OC 
FF: O2 
A: Hl 
DÖ: 56 
40:54 
09:01 
Со: 4A 
FO: 1A 
FO: 34 
OO: SC 
Os GG 
に の 。 う 9 
Ed: R4 
00:44 
Сё: 4А 


OÖ: R4 
eo: oo 
ЕӨ% 59 
ЕӨ:7С 
о9:44 
Cû: 4А 
FO: 1C 
FO? SC 
од: B? 
eo: oo 


во: B4 


Fø: 32 
оо: B9 
eo: дө 
EO: Z? 
EO:RB4 
09:99 
EO:D3 
CO: 94 
Ed: 48 
00:69 ` 
eoo: O0 


OÖ: 4C 
eo: oo 
EQ: AB 
Её: 28 
00:85 
80: 84 
Ж ЕН の 9 
ҒӨ:з1С 
09:54 
eo:oo 
CO: 4B 
EG: 94 
00:49 
86:84 
Ed: の 9 


FO:F2 
00:34 
eo: o0 
Co: 4B 
Её: ВА 
60:49 
оі: DA 
01:17 
01371 


73 


PiO'85 年 7 月 号 p.94 の 方 の 質問 に . СЗ 
る だ け 答 えま す . 

まず , 配列 変数 の 中 に その 武器 の 破壊 力 
な ど を 読み 込ん で お ぉ きま す (だ と えば , > 
өрге) 小玉 だ がら 3 と よ ゆ や ゆう グ よう に)。 そ を 
し て 戦闘 に 入っ た と き , 経験 や 武器 の 種類 , 
その キャ ラク タ の 素早 き 8 など で , どちら が 
早く 相手 に ダメ ー ジ を 与え る か 決め ます . 
その と き ,。 も し ダメ ー ジ を 与え だ な ら 6 ばば, 
以前 配列 に 入れ て あっ た 数 を 取り 出し , 相 
手 の 体力 か らら それだけ の も の を 引き ます . 
Z LT, これ を どちら か が 死ぬ まで 続け ま 
+. も ちろ ん , A が B を 先 に 攻撃 し た な ら , 次 
は B が A を 攻撃 する と いっ た だ 具合 で す . 
gis, ダメ ー ジ を 同じ 数 し か 与え を な いと 
いう の が ,“ 面 白く な い /" と いう の で あれ 


毎月 か わい い , きれ いな キャ ラク タタ が 送 
られ て き て いま す 。. 僕 も 使わ せ て も ら っ て 
いま す が 。 お 願い が あり ます 。 それ は 。 X 
くだ た だ は が き に 絵 を 書い て 投稿 する 人 が い 
お た いう こも て すず す 。 

だ し か に キャ ラク タタ 自身 は いい ん で す が 5。 
この まま て は と て 4 もじ ゃ な いり けど 。 ゲー ム 
の キャ ラク タ に する に は 難し いん じゃ な い 
で し ょ うか ? これ で は 。 何 の だ た め の PiO 


| ФӨСІ ҮМСО 

反 BASIC 主 義 に つい て の 意見 も ほ ば ぼ 出 
うく ぐし ん た よう て す が 。 РЕЛ ОЛ е C us 7 
こと を 言わ せ て も らい ます . 

BASIC で ゲー ム を 作る と いう こと は , 
その 遅 る き や ハ ー ド を 最大 限 に 生か せな いと 
いう 制限 の 中 で する 作業 で すか ら , マシ ン 


語 の ゲー ム を 作る より も は る か に 困難 で , 


ご ま か し が きき ませ ん 。 ゲー ム の 基本 が し 
っ か り し だ も の で な いと いけ な い の で す . 
最近 の マイ コン ・ ゲ ー ム は , サウ ンド や 
グラ フィ ッ ク の 派手 る き で 押し を きか せ て い 
よう な も の が 地 て (より ビデ オダ ア ーー ム に た 
е と) スー パー マシ ン ッ 志 向 に 庁 和 寄 りり 過 
で て oO あ の は な だ いて し ょ うか 。 BASIC 
が 登場 し た ころ の ゲー ム は いか に も マイ コ 
ン 的 で , 何 か 一 味 違 う も の が あっ だ よう な 
気 が し ます が …. これ も 時 代 の 流れ で し ょ 
うか ? ЖЕ, その ころ の BASIC ゲ ー ム 
は , 面白 いも の が 多かっ だ と 思い ます . 


@ みじめ な EIf 
ば , 乱数 を 使う こと や その キャ ラク タ に 力 
強 る と いう 要因 を 与え れ ば , も っ と 良く な 
037, 例 を あげ る と , 
А-ІМТ (RND (1) ж5):В-С--А 
この と き , 変数 C は 武器 の 破壊 力 で す . 2 
し て 変数 B を 体力 か ら 引 け ば , 一 応 そ れ ら 
し く な り ま す . 力 強 る は 初め 0 に し て お き , 
英 と 戦う た びに 十 1 し て 武器 の 破壊 力 に 足 
し て や れ ば 良い の で す . 

まあ , つま る 所 は 乱数 と 力 強 る の 2 つ を 
一 緒 に 使 を ば より 良 じ いも の に な っ て くる と 
いう こと で す . も し ヨロ イ と いう 物 を 使う 
な ら 頭 に 入れ な けれ ば な り ま せん が …。 I 
うい うこ と は 。 あま り 上 難し く 考 えて は いけ 
ませ ん ね . で は , 頑張 っ て ゲー ム を 作っ て 
(77254, 


@HERODER 
パー ツ か わか り ま せん . 

こう いう 考え を 持っ て いる の は , 僕 だ け 
じゃ な いと 思い ます. あっ, この キャ ラク 
Яс», Cà, こん な ん じゃあ なぁ ヵ 
ー」 と 思っ て いる 人 も 多い と 思い ます 。 2 
れ か ら PiO コ パーツ に 投稿 する 人 は , 気 を 付 
け て ほし いと 思い ます . 


アー ネス ト は まだ まだ 未完 成 な も の な の 
с, 2 回 も ほめ ゆめ て くだ きる っ て , あり が と う 
どき ざい ます ( ょ っ て で も うれ し が つ だ ん で す 
よ )。 

アー ネス ト の 基本 構成 が 3 点 し か で き な 
еді, 私 が それ し か 持っ て いな いか ら で 


т (&X-). や っ と こ , 最近 プリ ンタ が 
な ん と か 買え そう な 気配 (СЪ ROM 
(ECHTE UCT) СТ. ^mXLUTEA, 
他 の も の より も まとも な ディ スプ レイ が は 
し い の で す が …. YOU の アド バイ ス も , 
いつ か デリ ンタ や ディ スク が 手 に 入っ だ ら 
和 け よう と 思い ます (実は トー ン 、 COPY 
HNELETOSACTUEDOA TASTY 
ATT: 

人 の は で ごろ の アー ポス トド は £562 


か 改良 を 加え られ て いま す 。 次 は で き あ が っ 


Мы ғы Тт OX 
きら に は SUBCPU で PAINT の スピ ー ド ・ 


PiO ス クエ ア で は , PIO PIO の コ 
ー ナ ー で は 書き きれ な いよ うな 情報 
>, メッ セー ジ を お 待ち いた し ます . 


P 


@ りん で ん 

LJ EIRIC. €: P 2 "PO 
な が 人 は この 人 だ /」 で す 。 ER SND 
る 号 に は , 結果 が 発表 きれ て いる ん じゃ な 
いで し ょ うか で きだ ら 。 PEMEDO 
で 名 前 を 出し て ほし いな . 自分 が どの くら 
ぃ PiO な 人 と いう の が わか る か ら …. 

し か し , PiO な 人 と いう と イラ スト の 投 
稿 者 が 強い で す よ ね . 第 1 回 で も PiO パ ー 
У MUSIC で 常連 だ っ だ た だ MIKAKO き ん は , 
名 前 が 載っ て いま せん で し だ た だ . 常連 と し て 
は 変わ り が な い の に …. 第 2 回 は この 差 が 
は っ きり で て くる に と 思 いま す . 

結局 「PiO な 人 」 と は , 人 目 に 付き や す 
Д ンク ト の 強い 人 な の で す よ さよ. 209, 
PiO な イラ スト や PiOPiO な ら 自 己 主 張 が 
で き , 読者 に 強い 印象 を 与え る こと が で さき 
ます か ら . | 

それ に し て も , 簡単 に は 「PiO な 人 」 に 
は な れ ま せん よ , これ か ら , まだ は 現在 進 
行 形 の 「PiO な 人 」 を 目指 す 人 達 … (私 も 
£ 2) Z. TPiO 72 AN y CHECI cue 
こと じゃ 割り 切れ な い 何 か が 。 も っ と だ く 
る ん ある と 思う の で す . そもそも 「PiO な 
Жа て 何だ あう?7 , 2 )— Било 
だ 人 だ っ て 現在 進行 形 の 「PiO な 人 」 だ ろ 
5L, お そら くく 完璧 な 「PiO な 人 」 な ん て 
(いない 思い ます ささ 

な ん か 訳 の わか ら な い 抽 象 的 な 文章 を , 
ず 6 ず ら と 並べ て し まい まし だ が 。 や っ ぱ 
り 「PiO な 人 」 っ て 魅力 的 で す ょ よ A. 


@ サム ・ ハ ロス 
アッ プ を 企 て て おり ます 。 

話 は 変わ り ま す が ,。 アド ベン チャ ー を 作 
る だ め に 部 分 スク ロー ル を 制作 , 完成 し ま 
だ っ も テリー が 人 ん ば すぐ 6 Tra 
そう で す (SUBCPU 使 用 ) . 

それ か ら 。 私 は 「 ネ バー エン ディ グ ・ ス 
トー リー」 が 。 と ぉ 一 っ て も 気に入っ て ま 
+ (LP も 持っ て る よ ). 3 年 ぶり に 見 だ 映 
BEIC し だ. 


どうも, RobinC$. BLACK JACK < A, 誤解 が な いよ うに 一 応 書い て な お きま す が 。 入会 希望 者 に は すべ て 入会 案内 を 送り まし た の で 安 


9, e 
心して くだ さい . し っ か り と 会 員数 は 60 人 を か な り 越 えて な お り ま す . それ と , 
| Do り が と う ご ざ いま し た だ. Lin» Utravot*4T—^AtTUx5»? 


АТАКУ. 私 まで も メジ ャ ー な 人 の よう に 言っ て くれ て あ 


25% EF, 近々 X1 ター ポ ボ を 購入 する 了 予定 で す . 今年 中 に は 24 ピ ン 
の 漢字 プリ ンタ も 揃え る つも り で す の で (現在 16 ピ ン ), PCUC 会 員 の みな さん , 会 報 誌 の 質 が グー ン と UP する の を 心待ち に し て いて くだ さき 


PC-GOOO0» 


Nep-BASIC 十 マシ ン 語 


198х +, 某国 某 生 物 研究 所 で , 極秘 の 
うち に 遺伝 子 操作 に よる 研究 が 行なわ れ て 
いた . と ころ が , オ ペレ ー ト ・ ミ ス に よる 事 
故 の た め に , 唯一 の サン プル 細胞 が 細胞 組 
織 に 分 解 し て し まい , 勝手 に 動き だ し て し 
まっ た 。 そこ で 。 Аара АР 
すべ て の 組織 を 回 収 し て ほし い . し か し , 
中 に は 毒性 , 攻撃 性 の 高い 細胞 も ある の で 
気 を 付け る よう に …. GOOD LUCK// 
画 プ ログ ラ ム ・ イ ン フ ォ メ ーション 


N60- BASIC 


マシ ン 語 АСЕ0--ВТЕҒ 


デー タ D000—D7FF 


速 さや , 面 数 の 選択 が 簡単 に 行なえ る 
の は 良く で き て いま す が , 動き が キ 
ャ ラク タ 単 位 な の で , ぎこちない で 
すね . 


i eie aye E "eye ry Ca "exe ^s Ye у 


i3, 入力 前 に CLEAR50, &HACDF を 
実行 し ます . それ か ら リ スト 1 の BASIC 
を 入力 し テー グ に セー し ます 。 そし て , 
マシ ン 語 モニ タ (I/O モ ニタ , PiO モ ニタ な 
ど ) を 使っ て , リス ト 2 の マシ ン 語 リス ト 
(ACE0H —B7FFH) を 入力 L, BASIC の 
すぐ 後に モー グ し ます 。 ЖЕ “aqp 
マシ ン 語 (D000H —D7FFH) の 画面 デー 
HAJI Cs SO APORTES 
後に モー ググ し ます . ゲー ム の 説明 も , 作者 

苦労 を 理解 し て 入力 し まし ょ 2 う . 

実行 は ペー ジ を 2 に し た 後 , BASIC を ロ 
ー ド し RUN する tL, マジ シン 語 プロ グラ ム 
と デー タ を 自動 的 に ロー ド し , ゲー ム が 始 
£T. 


CLEAR 180 ,UHACDF 

CONSOLE, B 
БОЦЕ 
DISS 


БО ШЕ 
DISIE 


ri Ft By pi J Cn 
minum ce 
(mmo C Xm 

[uox] 


E‏ ل“ ل“ عى له 


ñ 
3 
s 
ә 
a 


リー ズ 


バイ オト ロン 


細胞 関係 
ボー ナス ・ キ ャ ラク タ 
ミサ イル 
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キー は , カー ソル 1[5PAGE | どす (詳し 


く は 画面 に 出 ま す ). 目的 は , 人 を 操作 と し, 
таме жас ЕСТ. する 
t, 画面 左端 に ボー ナス ・ キ ャ ラク タ が 出 
sar dde уана 
サイ ル で エイ リア ン を 一 時 眠ら 5 せる こと が 
で きま ず が 。 し ば らく すれ ば 動き だ し ます 、. 


マシ ン 語 は , 作っ て 時 間 が た ち す ぎ て い 
て 自分 で も 何 が 何だ か わか り ま せん . 
BASIC も 見れ ば わか る と 思い ます が 。 Hi 
Жы ау АЗБА қы 


人 の 数 qui, A pM 聞い 
25. ОТ, 提示 に し た が っ っ CCR 
英 の 数 は , BO2EH を 1 一 6 の 間 で 変更 し て 


977%, 面 バ ター ン 変 更 は , ЖІ, 2 を 参 
考 に し で くだ さい 。 まだ 1 面 は 16х160 


256 バ イト で 構成 る され て いま す . RKR 
点 を あげ ます . 
変更 は 00H と FEFH だ け に する . 


リリ スト 1 BIOTRON BASIC リ スト 


CLS 
IFAàÓ-2iTHENGÜSUBES4A4B 
МАМ= 3 : МЕМ= 1: 2=40 :: 


09 5 زم 


4 
S 
3 
В 
つ 


ІМРИТ"<РЕЕр-( Q4 J. 


= таныш \ 


D000—DOFF 
D100—DIFF 
D200—D2FF 


D300-—DS3FF 
D400—D4FF 
D500—D5FF 
D600—D6FF 
D700—D7FF 


@ 外 枠 を 作る . 
キャ ラク タ を 壁 で 囲ま ない. 
Өкі (110) 1:1, ボー ナス ・ キ ャ ラク タ 
が 出る の で , 行け る よう に し て お おく. 

まだ 16 メ 16 の マス を 紙 な ど に 作っ て 考え 
る と 良い と 思い ます . 後 は 適当 に 解析 し て 
みて くだ きい 。 だ が ル で まな いて "しゃ せ : 和 し 。 
や っ て も むだ か な ? 


pets # ゲー СІ toT 
X1 の Mr. フ ジワ ラ , Ж ЕЖ < #1724 
の Mr. タ 々 タカ み ヒト に この 場 を 借り て お ぉ お 礼 を 言 
“27, 5, 88nkl C7 S > t = аи 
を 作っ て いま す . いつ で きる こと や ら 。. 

これ が 採用 る れれ ば , 面 パ パターン 作り 用 
の プロ グラ ム を 発表 し ます . 

それ で は SEE YOU AGAIN // 


エイ リア ン が 眠っ て る うち に … 


POKE &HBSCB , Z 
PRINT "u МАМ d に に 47 う は Sich. 77 


INPUT "fu に kh に LETH (に k す " う > 1) 『 


い ( あ まり 期待 が 大 きい の も 考え も の で す が …). 


PS. RASA, りょう 
て くだ さい ね / ФБ LS A. Nakky さ ん , お 友だち に な っ て くく だるい. 


こき ん, お 元気 で すか ? 


菓子 子 き さん,。 まだ イラ スト な ん か 描い 
(彼女 が 欲し く て た ま ら な い Robin ) 


75 
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リリ スト 1 BIOTRON BASIC リ スト 


Әй INPUT "ма. @ bà は じい ます ilme || 540 SCREEN 1,1,1:С15 
すう ャ お) МЕН ; 390 PRINT 4а D JE , 9E .BB8 . 
81 IF MEMZIORMEN?STHEM 880 27-2 PRINT " < BIO TRON > 3, g á 
83 М=МЕМЧ Se :Мі=1МЧТ СМ)  М-(М-М12%9 2» X 37, ‚20,02,0980, 
85 М-53243%(М%254) 400: РКІМТІРРІМТІРБІМТ " USE ? am.as 
e? Mi-INT4MAÁ/25é5» :POKE&KHBESSC,8:FO0 KEY-2-VAE UA Ner 2; DATA aa ; 20, a^ $. ,99, 88 84, ай, ‚В? 
KEX:HBSSD ,&HDS : РОКЕНОЎ52 М1: ЕХЕС 410 PRINT :PRINT " Ts 3,00,00,0E, а? 98,03 ‚Өй 
&HD9SB — 420 PRINT " k 870 DATABE,87,18,B7,24,08,00,03, 
33 AD=44928+ (MENZ 24) б-аб/254:051 428 PRINT " ミー — + == 08,39,02,00, 03,08,30 ,67 
-INT(CG» :6=6-51:6=6х254 —" S20 DATAZS,08,08,00,08,06,00,00, 
8°? РОКЕЎНЕ?48 , 6: РОКЕЪНЕ?49 ,61 440 PRINT. " | ~ || аа,йй,йй,йй,йй, "eM 
90 EXEC kHD テ Sg pon 988 RESTORE 820 ` 

188 CLS:LOCATE?7,7:PRINT "それ て "は б 450 PRINT " M" £PRINT $18 FOR àáD-XHBáüa8 TO HB る る F 
AME START" 440 PRINT " PUSH ANY KEY о>й READ АФ: РОКЕАО VAL (¢ "dH" +A) 
102 LOCATE?,8:PRINT "GOOD LUCK" е оай NEXT:RETURM | 

185 GOSUE 1878 478 Gf$-IMKEY$:1IF 04-"" THENM4?8 1888 SOUND?, 56: PLAY "215%188-8т5 
187 50506 Фйй 508 SCREEN 1,1,1:CLS agg" 

103. POKE МНВ%17,51:РОКЕҺНВЕВе618,52 510 PRINF :PRINT:PRINT ійій FORI=ITO 2 ! : 
118 FOR B=9 TOS8:NEXT 550 PRINT " コ / GAME n MAN Э 01820 PLAY "ldode-l8e-d-l4ao2b-18b 
120 SCREEN 3,2,2:COLOUR ,3,11:CLS$ 7209 ы. S PRINT -о49-" 

138 EXECKHACES бей PRINT " テキ ト fh ЯУ 2 UII іаза PLAY "laode-123e-d-!4e-r4" 
139 ЕХЕСҰНАЕӢЙ カマ ラ f4":PRINT 1040 PLAY "1134 ら 4 ロー1 8 ロー セー 1 3 ュー1 8 ロー ゴ 
148 С=РЕЕК‹НЕ& 1087 578 PRINT " әс が sg. Жур =н 

158 1ЕСбС=®%НЕРТНЕМ 2238 20990 リド PRINT «ll 1058 PLAY *'18o4e-e-e-d-14o4e-r4" 
148 MAN=MAN- 1 998 PRINT " «b Sud» / 057“ Э 1860 NEXT I 

178 IF МаМ-<й THEM 258 PUXZT":PRINT 1855 RETURN 

180 SCREEN 1,1,1:С15: 5908 PRINTS 47k 49 ақ "Ttg 1878 SOUMD?,S94:PLAY ".15t28828m5 
1?8 LOCATET,?:PRINT "QZY に に すう PRINT | айй" i 
MONTE, る gg PRINT " BY HARUKI 1й8й FOR I-1 TO 2 
2 ылуу ОТИУ РЕТ РЕЕК СНЕ ё gU," SPRINT 1878 PLAY "lS8505co4badeScodbad" 

Аы же al Бы 610 RETURN . 1188 PLAY "l8oScodbafoScodbaf" 
2 PRINT "SCORE z";S:6G05UBi1aaü8 200 PRINT."LOADINO === gt с^" 1118 PLAY "l&So05codbaldglS&aboSc" 
2 FüRE-BTO1888:MEXT:GOTO SB 743 RESTORE 718. 1128 PLAY "l855c-dd-l!3er4" 
288 SCREEN 1,1,1:С15: 785 POKE&HFCBOE,8:POKEXHFCOF,ü 1128 NEXT I 
Ж LOCATES,6:FRINT TENT ED muti ?18 LD= ЕСЕ AS Ba kÇ НЕ 1135 RETURN 

ist, CLEAR し まし た" : 505086 18880 FSB) +16 1148 SOUND7,55:PLàY "wv 
241 MENZMEN* 1:1ЕМЕМ-ФТНЕММЕМ-1 728 FOÜRISLDTOLD4&H77 880","415t180s8m50B6" 
243 MzMEhL/9 :M I-INTGM3 :M-iGM-M1» x > 730 READ A$:FOKEI “YAL ¢ "BH" +A) 1158 FORI=1TO 2 
245 М=52243+‹Мх25&) 740 MEXT 


4 1140 PLAY "l2o4elS8o4dc","r818 
247 МізіІМТҰМ/25642 :POKE&HBSSC , 8 : P 758 EXEC LD:RETURN ча 


OKE&HESSD,&HD8:POKEXHD?S2,M1I:EXE 278 DATA- cd,9?a,25,056,05,cd,78,1a 1178 PLAY "1304918 8o4cl8o3b", 
Сынр?5й ‚+е,++,+5,20,1@,04,21,41 BoSddelzoSd" 
248 ロロ ニオ る マコ B+( ト 1E ト | ド マコ ) :625D^/2545:6 788 DATA Те,са 4. 70, ia А v А 23 А ій T9? 1138 PLAY "l2354dcl8o3ba",."rB81l1go5c 


12INT&£6» :626-61:626GX 256 ,096,05,cd, 28 ‚а yon af,z28 

249 POÜKEWXHBE?48S,G6:POKEXHB? 47,61 79й САТА e2,18,77,21, ,10,4с,04,й4 ов PLAY "l253bldo3er4","l3o4br 
z58 GOTO 198 ,cd,78,1a,77,28,10,f419,21 

268 SCREEN 1,1,1:CLS 8 бата di,fe,06,02;cd,70,1a,77 MEXT I 

278 LOCATE?,46:PRINT "GAME OVER" 28,18 ,4£9,41,20,07,8045,84 RETURN 

275 GOÜSUB 1144 818 бата SF 77,252 18 fc 21 76, 2: 1509 RESTORE 1558 

280 S-i(PFEEKCKHEA&17»5) + CPEEKC&KHBEZA1 ,Cd,9823,29,cd,9a,25, ed, 5b FOR àD-&HD958 TO €*HD9?58*11 
8» x254) 215 DATA Be,fc,?7a,b2,28,84,ed, Sb $20 READ &*:POKE АР, ЧА "Н" +АФ 
298 LOCATE?,7:PRINT "SCOR t .18,fc,2a,12, fc, 19, eb, Be ў 

295 CLEAR:EXECKH1858 816 Бата 8й,са,7й,1а,77,81,44,23 S28 NEYT: EM 

200 LOCATE?7,9:1MPUT "t$oyu$r" PY? ,e7,98,fó,cd,78,1a,b9,cd 558 САТА 21,88, 

Ewn! ?" АФ 17 DATA aa.la,.cS8,.,1e,24,.c2,81,84 : И: 

2 IF A$" y" THEN GOTO 3868 828 DATA 81,01,8080,080,01,01,08,08 | T" EUN UR 

Er IF A$="n" THEN END , AH, AH, AB, аәй,08,01,йй,й0й 

335. SOTO 40 8 ратайа,88,78,54,08,0й,й8,0й, 
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76) С みなさ ん, だ いぶ 古い 話 で す が 「NOVA 2001」 と いう テー プル ゲー ム を 知っ て いま すか . 私 は この NOVA が 好き で , ゲー ムセン ター に せ 
Ол (о) (O) っ せ と 通 っ た も の で す . そし て どん どん 上 達し て いき まし た . ある 日 私 は 917.390 点 まで 行き まし た . そし て 次 の 日 。 きょう は 100 万 点 突破 す 


> = > 1 


Ше! NOVA が な い ! ほとん ど 残 酷 物語 レバ ー の と ころ の ネジ が 取れ て い 
76 OO た か ら な く な っ た の だ ろう か . それ に し て も あん まり だ . それ 以来 NOVA へ の 思い は つの る ば か り で … も うぅ 一度 や り た い ! だ れ か 知り ま 
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Gate 2 の 場合 、O つ きん (た な ぶん) の ゲー ム ・ オ ー バ ー の 状況 は 2 面 め の 2 パス めで , 画面 中 央 より 1 キャ ラ 左 の 位置 で .、 スコ ア が 2.430 点 (これ 


o! ©) А О と 今さら な ん で す が , マシ ン 語 は 編集 部 の 方 々 の ゲー ム の 腕 が わか る と いう メリ ッ ト が あり ます ね . ちな み に , 7 月 号 の MZ-80 用 Water 
L Dp は ハイ ・ ス コア で し た ) で , バリ ア は 解除 し て なり, パス が 変わ っ て すぐ に 連結 部 の 壁 に が ちあ た っ た よう で す .。 や ー い . や ー い . 


(ふと どき に も 編集 部 を お ちょ くる CLYNCO) 
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リス ト 3 BIOTRON 画面 デー タ 


D44Bi:FF FF ай DéC8:a8 йй aa йй йй FF @й FF:FE 
D45B:FF 00 ай DéD8:FF 88 FF FF FF FF FF BB:FÁ 
0458:00 ай ай DáD8:8B FF FF FF FF FF 88 FF:FA 
D4éB:FF йй FF DéEO:FF 88 йй йй йй йй йй 4O:ZF 
0448:ЕЕ BB a DéES:88 AA BB йй йй йй 40 FF:2F 
ай О<ЕЙ:ЕЕ FF FF FF FF FF FF FF:F8 
ай DéFB:FF FF FF FF FF FF FF FF:F8 
DSES:FF йй у || ------------------------------- 
DSC8;FF Sum: 34 FD F4 F8 39 F5 3D 34:BC 
DSCS:FF А 
00:3 DSD8:FF F Fi D?88:FF FF FF FF FF FF FF FF:F8 
D422: 48 FF :3f DSDB:FF F: D78B:FF FF FF FF FF FF FF FF:FS 
D47B:FF ВІР DSEB:FF BE дй аз йй 48:2 D7i18:FF 18 йй йй йй йй йй Oi9F 
047o: FF FF:FÁ || D5ES:00 йй à 8g : D71i8:88 09 йй йй йй йй 28 FF:2F 
ОЗАВ: РЕ E at ! › || DSFB:FF D720:FF 88 FF FF FF FF FF ЕҒ:Е? 
САБ: РЕ | DSF8:FF | в || D728:FF FF FF FF FF FF йй FF:F? 
D4EB:PF OG Fm 99 : Fé D788:FF йй FF FF 88 88 80 FF:FC 
"BELL a" | | ЖЕ | る Fá ЗВ ЕЗ 3° 232:5! D?28:FF йй 08 40 FF FF йй FFi ヨ C 
DACB:FF ü FI D7?48:FF 88 FF FF 88 FF B8 FF:FE 
DaCe:FF 99. DóB88:FF | || D748:FF йй FF йй FF FF 09 FFsFB 
DaDB:FF "T D る 98sFF S ||p758:FF 88 FF FF 88 FF 88 FF:FE 
D4DS:FF ag D る 1@sFF E D?58:FF 88 FF йй FF FF йй FF:FB 
D4AEB:FF a8 D る 18i99 3 ] р760:ҒЕ йй FF FF йй FF Bü giFC 
D4ES:40 4й Dé28:FF о768:8й 88 FF 00 FF FF йй FF:FC 
D4F8:FF FF Dé28:08 FI D778:FF 88 FF FF 88 FF FF ҒҒ:ҒА 
FF бӛзйш:ЕР D?781FF FF FF йй йй йй 4й FF:3C 
0580106 80 09 40.09 FF 00 FETSE ||. ааа 
Dbé48:FF BE š Sum: F2 8C ҒЗ 87 FB F4 éC F2:72 
. Dé4B:1FF 
ET DóS0:FF 8 СРЕ || p788:FF 88 йй OW 48 йй 00 BkSF 
| FF DSSS: FF : р788:48 22 00 00 йй йй йй FF:SF 
16 ай 88:8F || DéóB:FF 9E 38 F! ae :FE || D798:FF 88 FF FF 44 FF FF ЕР:ҒА 
519 an FF :2F 568 š | | || D7981FF FF FF йй FF FF йй ЕЕ:РА 
520 FF йй: 578: :FC || p7à8:FF 00 FF FF 08 FF Bü 8B8:FC 
0528 4 D7à8:88 йй FF йй FF FF #0 FF:FC 
0528 D7EB:FF Bü FF FF #9 FF 88 FF:FE 
0538 D7BB:FF йй FF йй FF FF йй FF:FB 
L540 D7CB:FF 00 FF FF йй йй йй FF:FC 
0548 DESO: FF ; ; SF || DZCBiFF 88 00 aa FF FF йй ЕР:ЕС 
LISS FF | || 9 ag 3 D7D8:FF 00 FF FF FF FF FF FF:F? 
D558:FF | FFiFA || DGPgiFF : D7D8:FF FF FF FF FF FF йй FFiF 
DoéB:FF £ iid: 28 B8: DPS: FF Š DZEB:FF 88 00 йй йй BB йй 40:3Ғ 
p5sg:an a | || Оа: ЕЕ 55 | | D7ES:88 әй йй йй йй йй 4й FF:2 
DS78:FF 6 36 ; DéAS FF ||| D7ZF8:FF FF FF FF FF FF FF FF:F8 
0578:ЕҒ an : X DéBB:FF : | || DZF8:FFE FF FF FF FF FF FF FF:FS 
DéBB:FF ай T BN. мшез О-га Ea 
DéLd :FF 3 BÜ Sum: 33 FC F5 ЕЗ 28 F5 3C 33:88 


あー 9441220 
-2- dE EP 


16 Bait X 、 コ メデ ュー ワー ザー ム で は «37,100 Liz d, 

ネリ 使 れ て いな МЕ 6 72:24. Š 
TOT. Cem. e ас BEI 857503:9-V0BS 0 LÊ аз, 
KO vt ЖАЛ тта ушт. 


79 


Nso- BASIC + 7 2 > Ё 


PC-BOOTmkII/SR., с... 


MCNT が 再度 自信 を 持っ て 編集 部 に た た き 
つけ る の お て ん き ソ フト "COSMIC RAIL" 
C$. メン バー か ら 一 言 . 

和 亜 魔 留 : バッ ク の 星 が い いっ 
ЕЖ: 載っ た の は あり が た いこ と ぢ ゃ 
異 能 苦 魔 : ん 一 まん だ む 

死 密 暗 : 困 っ た も ん で ある 

画 プ ログ ラム ・ イ インフォメーション 


m N,-BASIC 2% 
| マシ ン 語 B700-D77F 


|] 従来 か ら あ る ゲー ム に , 新しい アイ 


デア を 加え て 面白 い ゲ ー ム に な っ て 
いま す 。 (Ti) 


IPL(BASIC) £ = zz i&(B700H —D77FH) 
と BASIC で て き て いま す . 

生生 た の だ た を 入力 も 。 те” 
= 27, ХСУАРОТУИУНҒЕ 
入力 し , IPL の 後に モ セー プ し ます . そし て 
リス ト 3 の BASIC を 入力 し , マシ ン 語 の 後 
セー ププ すれ ば で きる あがり で す 。 

Р РРО ВЕ L. IPLE Uu == QUE 
RUN す る と, 残り の プロ グラ ム を 読み 込 
み ゲ ー ム が スタ ダ タート し ます . 

な お マシ ン 語 は 80% デ ー タ で す の で 。 気 
楽に 打ち 込ん で くだ さい . 


R$(12)+" ww" 


(K$,I,1)):NEXT 


10 E$="MON"+CHR$ (13) +"L"+CHR$ (13) +СНКФ (2 
) +"CLOAD" *CHR$ (34) +"C"+CHR$ (13) + "КОМ" +CH 


30 CONSOLEQO,25,0,1:WIDTHAQ,25: PRINTCHR$ ( 
12) : COLOR7 

40 LOCATES8,8:PRINT"7* 07° ラム LOAD 919% 

50 LOCATE6,10:PRINT" 
L ] 


20 FORI-1TOLEN(E$) : POKE&HEAZ7E-*I , ASC (MTD ま 


[a]c レー ル の 端っこ “L” に 向かっ て 
動き , |@| で 同じ く "R^ に 向かっ て 動き 
id. また | SPACE | で 千 点 棒 ク ラッ シュ が 
出 ます . 

敵 を 倒し て "CLEAR" と 出れ ば , KD 
面 へ と 玉砕 し ます . 当然 面 が 変わ る ご と に , 
レー ル の 形 が 変わ り 9 ます 。 を そし て 。 な ん と 
100 面 ある の で す . ふっ ふっ ふっ つっ … あ と キ 


ャ ラク タ は 3 面 ご と に 変わ り ま す . 100 面 目 
の キャ ラク タ が 楽し み だ ゼ ぜ . 
この ゲー ム は 慣れ れ ば 簡単 で す . 


dier өлер Hed MESE 
To この 「 な ぞ 」 を 解く と . アポ ホ み だ い に 


НУ 0 U—Jv? C, 目 が 回 る 


リス ト 1 COSMIC RAIL IPL U Z F 


[COSMIC RAI 


リス トク COSMIC RAIL マシ ン 語 リス ト 


60 LOCATEO,14:PRINT" 
ed By.MCNT" 
72 COLORQ:FOKE £&HEDCQ,&H7C:FPOKE&HEDCI , &H 


レー ル ・ デ ー タ 
キャ ラク タ ・ デ ー タ 
移動 デー タ 

メイ ン ・ ル ー テ チン 
音楽 ルー チン 


100 面 まで 行け ます . 頑張 り ま せ う . 
な お SR の 人 は , Hi モー ド で する と バグ が 


7 月 号 の 「 ア ミタ ン 」 や り ま し だ か? 
何 や っ て いな い !? そん な 人 は 早く 入れ て 
遊び まし ょ う ( ち な み に 和 亜 魔 留 君 が 56 面 
まさ て 行き を まじ な た )。 

ちな み に MCNT の 4 人 は すべ て 受験 戦士 
ТТ, こん な こよ と を し て て いい の 0 だ だ あ うか, 

る て 次 回 予告 で す . PC-8001mk II 用 
「 じ ゃ ん び ぴん で すま っ し ゅ 」( 仮 題 ) で す . 
MCNT は 墓穴 を 堀 る の か … こう 御 期 


構想 4 箇月 ,。 メイ ン ・ プ ログ ラム 制作 2 日 , 
その デバッグ 2 日 。 キャ ラク タ ・ デ ー タ 入 
力 2 日 。 レー ル ・ デ ー タ 半日 , 調整 (サボ 
リ ) 1 週間 で し た だ た. ちゃ ん ちゃ ん . 


Fresent 


EA:FOKE &HEA68,1 


い だ 思 っ だ の で す が , PiOPiO に 方 言 を 出し た ら 6 面白 いで し ょ う ね ー. 


知り ませ ん で し た . 円 きん の フル ネー ム は パー キン グ ・ エ リア だ っ た ん で すか / 


PS1 この ギャ グ う け な い だ ろう なー. 
PS.3 租 本 泉 先 生 を 知っ て る 人 は PiOPiO に その こと を 書 こ う グ 


ps2 0 


(あお いち ゃ ん と SUE ち ゃ ん と ラー ちゃ ん と ナウ シカ の 好き な 木 足 と り も ) 


euo 


リス トク 2 COSMIC RAIL マシ ン 語 リス ト 


81 


pic 


リリ スト グ COSMIC RAIL マシ ン 語 リス ト 


s 32 
:Е6 
:F9 
316 
:86 
IFC 
: DA 
: AB 
:09 
:А6 
:36 
:А2 


° O を どう も , ば ん ちゃ ん ず の 真一 で す . みな さん, お ヒマ で し た ら PiOPIO で 「 ば ん ちゃ ん ず 」 の 5 人 と お 友達 に な り ま せん か ? 根 暗 な キミ 
o9 ОО は BANCHA t, 流行 に 敏感 な キミ は 星 と , マイ コン で ゲー ム し か し な い キ ミ は BOKE と , 悟り を 開い た キミ は 北村 と , そし て 女の子 は ボク 
ジウ と 友達 に だ ろう / な ん て 書い た ら 4 人 は 径 る だ ろう な (と 言い つつ 書い ちゃ っ た ). ホン ト , だ れ で も いい か ら PiOPiIO で ツマ ラナ イ 話 で も 

82 0224, ね っ / PS.「 ば ん ちゃ ん ず 」 を 知ら な い 人 は 6 月 号 p.182 を 見 まし ょ う . 5 人 と も 実在 の 人 物 で す ( 特 徴 が で て 5). 


Add +0 +1 
0100 QQ QA 


(山頂 に 住む た め 山猫 と 呼ば れる ば ん ちゃ ん ず の 真一 ) 


+2 
ao 


+4 
20 


%5 
2а 


+6 
A8 


+7 
ao 


+8 
の の 


+9 
AA 


153 
s SB 
:64 
1724 
:27 


85 


pic 


| リリ スト ググ COSMIC RAIL マシ ン 語 リス ト 


還 沙 大 エ エ ナル だ たよ: ルト エエ エエ エエ エエ ミエ エド エイ арр арно 

“М < COSMIC RAIL > 

А Ву. MCNT 

Hs IDEA & MAIN...WAR-MAL 

CHR & РАТА... . ЗНІМІТЅ-АМ 

MUSIC.... : 
BASIC.... 

“Т 1985-6-19 MADE IN JAPAN T 

本 た ルナ エル エエ エエ よ た エ エナ エルエル エエ ト エ エエ エエ エナ エミ ャ イキ エコ : 

CLEARSO , HE4FF : DEF INTA-Z: WIDTHAQ, 25: 
CONSOLEQ,25,0,1:CMD SCREEN2 。 の 。 1 : HS=1 の の 
110 DEFUSR=&HD6EF : DEFUSR 1 =&HD75E : I2=1:60 
TO 640 
120 OUT81,Q0:RESTORESS5Q0: GUSUE6 の の : WIDTHAQ: 
M= 1 : G= の : MS=3: 06=0: ID-&HD2: CC-SHCOQQ: РЕ=% 
HB700:k-3:CMD CLSZ 
150 DATA 05,05,00,00,00,00,00,00,d2,00,0 
1,01,00,00,02,d8 
140 RESTORE130:FO0R І-%НЕ000 TO&HEQQF:REA 
DA$:POKEI,VAL ("S&H +A) : NEXT 
150 LOCATE30,1: COLORZ7: FRINT 
ATE3S,2:PRINT "RAIL" 
160 FOKE &HEOQ8,1D:GOSUR 380: GOSUE 470 
170 FOR I-&HEO6Q0 TO&HEOBOSTEPZ:A$-HEX$ (%, 
нв@@@+кмр (1) *&H209Q) 
180 POKEI,VAL("&H"«*RIGHT$(A$,2)) : РОКЕІ+1 
,VAL (" &H"«LEFT$ (АФ, 2) ) 
190 РОКЕІ+2,КМ№р (1) ж4+2: NEXT 
200 FOR І-0 TO 127:РОКЕ &HD18Q«I,PEEK(CC 
+1) : NEXT 
210 I-&HD802:COLORZ 
220 POKE &HD800,255:FO0KE &HD801,255:X-PFE 
EK (PE) : РЕ=РЕ+1 : Y-PEEK (PE) : LOCATE Х,Ү:РБІ 
NT "L" 
230 POKE І,Х:РОКЕ I+1,Y:I=I+2:PE=PE+1:P= 
INT (PEEK (РЕ) /16) : IF P= の THEN LOCATE X,Y: 
PRINT "R";:POKEI,255:POKEI*1,255:60TO 33 
Q 
240 X=X+(P=10RF=40RF=7)-(F=90RP=60RP=): 
Y=Y+ (P=70RF=80RP=9) - (P=10RP=20RP=3) 
250 IF Х<1 THEN X=29 ELSE IF X>29 THEN X 
=1 
260 IF Ү<2 THEN Y=2 さ ELSE IF Ү>22 THEN Y 
=2 
270 LOCATE X,Y:PRINT "." 
280 POKE І,Х:РОКЕ I*1,Y:I-I*2:P-PEEK (РЕ) 
-P*16:1F P-Q THEN LOCATE X,Y:PRINT "К": 
POKEI,255:POKEI*1,255:GO0TO 520 
290 MEUM Ti (EN 
Y=Y+ (Р=708Р=ВОКР=9) - (P=10RP=20RF=3 
500 IF X«1 THEN X-29 ELSE IF X529 „Жл X 
=1 
310 IF Y«2 
-2 
320 LOCATE X,Y:PRINT ".":GOTO 220 
ささ の KT-6:k-23:GOSUBA70: RESTORES4Q: GOSUE 6 
a0 


"COSMIC": LOC 


THEN Yz23 ELSE IF Ү>25 THEN Y 


DeFQ 32 05 


リス ト 3 COSMIC RAIL BASIC U X Fi 


540 U-USR(Q):FORI-QTOK*15:NEXT: IF РЕЕК(% 
HE の の C ) = の THEN 240 
350 IF FEEK(&HEOQ6):»Q THEN 400 
360 IF РЕЕК(%НЕ007)<>0 THEN S=S+1+PEEK (& 
HE の の 5 ) * (RND (1) * さ +1 ) : GOBUB. 470: КТ=КТ- -PEEK 
(&HE の の 7 ) : IF KT-OTHENGOSUBZ80: DG=DG+(DG< 
Ø) : K=K- 1: MS=MS+PEEK (&HEQOQS) : GOSUB 470: IF 
К=@ THEN K-1:GOTO 420 
370 GOTO 340 
580 FOR I-&HEO20 Т0%НЕ0405ТЕР4:РОКЕІ,1-( 
1=&HE の 29) :POKEI*1,RND(1)*2541 
390 POKEI42,5:POKEI4Z,RND(G)*255:NEXT:KT 
=6』 RETURN 
400 FOR I-QTOZQO: BEEF1: EEEF 1 : BEEPO: NEXT: D 
G-DG*1:GOSUBS20:IF DG«5 THEN さ 6 の ELSE MS- 
MS-1:CMD CLS2:LOCATEZQ,11:PRINT" 
": DG20: GOSUBA70: 60506280: USUSR1 (&H828) : 
IF MS:> の THEN さ 6 の 
410 COLOR7:LOCATE 7,10:PRINT "GAME 0 
VE R !":1F S-HS THEN LOCATE 7,5:COLOR6 
SPRINT "M I =S ПО OR E it" 
420 RESTORE 590: GOSUE 600:G0TO 110 
450 GOSUEA470: M-M-«1:PE-PE*1:LOCATE10Q,10:F 
RINT "C L E A R":RESTORE 580: Б050ВФ00: IF 
М-101 THEN 920 
440 к-5:ММ-ММОр2:ІР MM=1 THENCC=CC+&HB の : 
CMD SCREEN2,0,1:ID-&HD2:GOTO 460 
450 IF MM-2THENCMD SCREEN2,0,5: ID-&HD4:G 
ОТО 46@ELSE CMD SCREEN2,0,7:ID-&HDZ 
460 CMD CLS3:GOTO 140 
470 LOCATE 30,9:COLOR2:PRINT "SCORE": LOC 
АТЕЗІ, 10: РКІМТ USING"S4HHIOO":S 
480 LOCATE 30,12:PRINT "SCREEN":LOCATEZS 
,13: PRINT USING"###";M 
490 LOCATE 30,15:PRINT "LEVEL":LOCATEZ6, 
16:РКІМТ 4-К 
500 LOCATE Z0,18:PRINT "LEFT":LOCATEZ6,1 
9:РКІМТ MS 
510 LOCATE Z0,21:PRINT " " 
520 LOCATE 30,21:COLOR7:PRINT LEFT$("CRU 
SH",DG):1F HS¢S THEN HS-S 
530 LOCATE 30,6:COLOR2:PRINT "HI-SCORE": 
LOCATEZ1,7:PRINT USING"443HHHIOQ" ; HS: RETUR 
N 
540 DATA 155,152,155,400,100,125,122,126 
,100,122,100,128,100,128,122,126,100, 12d 
,100,120,100,1256, 116,122, 100, 128, 100, 122 
, 100,419, ### 
550 DATA 233,144,233,144,233,144,233,128 
;22d,13d,22d,13d,22d,123d,22d,226,228,12Z 
,228,133,228,133,228,122,126,200,128,200 
:124,200,152,200,256,144 
560 DATA 155,152,100,155,125,100,122,122 
,100,144,144,100,232,228,12d,12d, 100, 12d 
:124,100,124,124,100,154,154,100,224,226 
570 DATA 128,128,100,128,128,100,128,128 
:100,156,156,100,128,122,126,126,100,126 


:126,100,122,122,100,122,122,100,222,222 
:21е,116,219,515,219,115,11е,122,126,128 
,12d,832,444 

580 DATA 119,119,100,115,115,100,11е,11е 
s100, 122,1 22,100, 126,128,12d, 128,326, 113 
„113, ### 

590 DATA 22d,22d,22d,22d,222,222,222,222 
;21e,21b,219,216,414,413,116,116,100,116 
:116,100,119,119,100,119,119,100,219,219 
;11b,11b,100,11b,11b,100,11e6,11e,100,11e 
:11е,100,21в,21е,522,152,222,%%ф 

500 READ A1$:1F Ai1$-"444" THEN RETURN 
610 M1-VAL(LEFT$ (A1%, 1)) : MI$-RIGHT$ (51$, 
2) 

620 IF М1%="@@" THEN FOR I-1 TO M1*12Q:N 
EXT:GOTO 600 

630 U=USR1 (VAL ("&H"+A1%)) :£FORI-1 TO М1#5 
Q:NEXT:GOTO ¿QQ 

640 COLORI2:CMD CLSZ:I=1:RESTORE710 

550 I-I*1:1F I=23 THEN 680 

660 IF INKEY$-" " THEN GOTO 120 

670 READ I$:LOCATE 3,24:FRINT I$:GOTO 65 
2 


680 11-0 
690 І1-І1%1:ІҒ 11-500 THEN 12-12%1%(12 
)*7:G0TO 640 

700 IF INKEY$-" " THEN GOTO 120 ELSE69 の 
ea 
R 

720 DATA ". E TETE 
730 DATA ". ш.а рін” acd a Mta 
OR 7... cm 
750 DATA " 
L 

760 DATA" 
770 DATA"*. 
782 рата" ~. Rv а-я 
790 DATA" ~. "x тасуы 
вод рата" ~ ; Sm 
810 DATA" ` RLRE SARE 
820 DATA" ` 

830 DATA" 
840 рата" 
850 рата" 
860 DATA" 
870 DATA" 
880 DATA" 
R 

890 DATA" ‘¬ —— — 
900 DATA" ISPACE IHIT & START 
910 DATA" س‎ 

920 CMD CLS3 

950 LOCATE10,10:COLOR 7:PRINT 
GIVE UP!!!" 

940 LOCATE10,12:COLOR 7:FOR 1=1702000: БЕ 
EP1:NEXT:BEEPO:GOTO 110 


COSMIC RAIL 
*PROGRAMED By.MCNT 


“ ` dd ` 


I4 IMOVE TO 'L' 16 IMOVE TO 


"COMFUTER 


NNI A b. aia CE СО RU C ашшы Чайна OX OO QOO RR UR URS 


9000000000000000000000000000( 、 11% る , K. T 
(КИН d EN 


© ر‎ l X ل‎ 


ЖАТУ 2 yy ОООО 
. 50099090000980000000 00800081 


Od VAS Y VV VO VV VPP SDDS 
(YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYS кесеге еякғастманонаввеноевваеввагерен 


漢字 プリ ンタ 
VP-80K 


ШУР-80К(3, コス ト ・ パ パフォーマンス に 
Жп, ビジ ネス に も パー ソン ナル ・ ユ ー ス に 
も 本 格 的 に 使え る , 24 ピ ン 80 桁 ドッ ト 

トリ クス 漢字 プリ ンタ で す . 

《 特 徴 〉 

> 超 小 型 24 ピ ン ・ ヘ ッ ド に より , 高 品位 の 
明 朝 体 漢字 (24 メ 24 ド ッ ト ) の 印字 が 可能 罰 
二 ル クト シート ・ フ ォ ー ダ (オプ デシ ジョ シン) を 義 
Жо ДТ), 


を いじ くり 5。 


ペー ノー バン ドリ ング 


を 自動 化 さ せる こと が 可能 了 e イ ンマ クト 
ドッ トマ トリ クス 方 式 の た め , 複写 紙 に よ 
る 伝票 発行 が 可能 区 ルビ 文字 ( 以 角 文字 ) や 
4 倍角 文字 の 印字 が 可能 ゅ 漢字 の 印字 スピ 
ー ド は , 漢字 印字 モー ド (40 字 / 秒 ) と 漢字 
高速 印字 モー ド (80 字 / 秒 ) の 2 種類 あぁ = Z 
ソン の 提唱 する 標準 プリ ンタ ・ コ ント ロー 
ルコ ー ド “ESC/P” を 標準 装備 漢字 JIS 第 2 
水準 (3.388 文 字 ) の 印字 が 可能 (オプ ショ ン ) 
《 価 格 》 Ұ147,000 

《 問 い 合 わせ 先 》 エプソン 販売 (株 ) 

宣伝 広報 部 


これ ら を 繰り 返す と , 


Я%160 東京 都 新宿 区 西新 宿 2-4-1 
新宿 NS ビ ル 11F 
2 (03)348-7121 


た だ いま より , 僕 が BASIC の マス ター の 仕方 を 教え まし ょ う . 必要 な 物 は PiO と 愛 機 の マニ ュ ア ル だ け で す . £4, 最初 に ミニ PiO に 載っ 
て いる , 一 番 短 い プ ログ ラム (も ちろ ん 自分 の マシ ン で 使え る もの) を 打ち 込み ます . そし て , お も むろ に RUN き させ る の で す . も し, エラ ー 
が で だら ЖТС, 者 が の で すず すず 。 まして, マニ ュ ア ル 片 手 に , エラ ー の 内 容 を 理解 し な が ら 直 し ます . 
その 変化 を 覚え ます . 最後 に . プロ グラ ム 自 身 を 解読 し ます . 


うま く 動 く と , 今度 は プログ ラム 
必ず BASIC は マス ター で きま す . 


PC-BB00 シ リー ス 


BASIC + マシ ン 語 


念願 の 地球 連邦 冥王 星 地 区 士官 学校 の 卒 
業 試験 を パス し た 俺 は , 故郷 の 地球 へ 引き 
上 ぼ げ て 冷た い ビ ー ル を 飲む 日 を 待ち わび て 
LU, 

し か し , 初心 者 パイ ロッ ト に も 実戦 経験 
を 積ま せ て 育て よう と いう 軍 上 層 部 の 命令 
C, いき な り 冥 王 星 戦線 の 実戦 に 駆り 立て 
られ て し まっ た . 

な つか し い 地 球 に 戻る に は , 各 戦 線 で 
30% 以 上 の 撃墜 率 を あげ て , ひと つ ず つ 地 
球 に 近い 戦線 に 転属 され る の を 待つ し か な 
い の だ . 

し か も , 30% 以 下 の 成 績 し か あげ られ な 
vc, 階級 を 下げ られ , 魔 の へ き 地 戦線 へ 
送ら れる と いう 恐怖 も 待っ て いる の だ . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
| マシ ン 語 


9000--С57Ғ 


撃隊 幸 300% と いう の は と て も キツ イ 
で すね . 一度 で 良い か ら 海 王 星 戦線 へ 


м A 
ys VÀ 
/ Vi 
we x ы , 


27, ЖЖОХЛАУ “САФ, Ne- 
BASIC を 起動 きせ ます . そし て AON 
IRETURNI び モニ タ ・ モ ー ド に し , S か E コ マ 
ンド で , 9000 番 地 か ら リ スト 1 を 入力 し ま 
zn 

入力 し 終わ っ だ ら W コ マン ド で セー グ プ 
し ます が , その 前 に チェ ッ ク サ ム を 確認 
し だ 方 が 無難 で し ょ う . 

続い て | CTRL ]- [B] c BASIC U R b , 


魔 の へ き 地 戦線 で 奮戦 中 


リス ト 2 を 入力 し ます 。. 

POKE ス テー トメ ント の 入力 ミス は , 2 
ログ ラム の 又 走 の 原因 と な り ま す の で , 慎 
Hu. これ も プロ グラ ム を 確認 し だ 後 , セ 
FLEYT. 


後 は RUN| RETURN | する だ け で す . 
S AA 
イロ グラ ム て 遊ぶ 


уалы жы! 
ル が 出現 し , 次 に ゲー ム の 説明 攻撃 が 始ま 
0, し ば らく し て か ら ゲ ー ム の デモ が 顔 を 
出し ます . その 間 は | SPACE | キー の キー 
入力 を 受け つけ て いま す の で , ハッ と 我 に 
か えり , シュ バッ / と | SPACE | キー を 
押す と , ゲー ム の タイ トル ・ ミ ュー ジッ ク 
と と も に ゲー ム が 開始 され ま す . 

中 央 下 に ある 宇宙 船 ら しい 物体 が , 自分 
が 操る モノ で , 少し する と 上 か ら 数 機 の 敵 
が も の すご い 速 る で 舞い 降り て くる の て 


ミサ イル を は な ち , 撃ち なお と し て 《 く だ る さい. 


キー 操作 は テン * キ ー 部 の |8 | が 上 , [2]» 
下 ,| 4 | が 左 ,|6 | が 右 で , ¥ 4 rv ?'[sPACE| 
キー と いう 例 の パタ ー ン で す 。 

な お , キー を 2 つ 押 すこ と に より , gp 
th 人 


この ゲー заново BEL, ЕЗ) 
着 す る まで の 間 敵 と 戦う も る ので, その 距離 
は 画面 右 に リア ルル タイ ム で 表示 きれ ます . 

だ と えば, 1 面目 は 冥王 星 戦線 と な っ て い 
LOT, 到着 する 所 は 海王 星 , 2 面目 は 海 
王 星 か 6 天王星 ほ と い う よ う に だ ん だ ん 地球 
に 近づい て いき ます . 

も ちろ ん ゲー ム の タイ トル どおり , その 
度 に 自分 の 階級 が 上 が り ま す . 

© LC, 最終 面 の 地球 戦線 が 終わ る と ゲ 
ー ム ・ エ ンド と な り ま す . 

一 応 面 数 は 全部 で 8 面 と いう こと に な り 
ます が, その 他 に 番外 編 と し て も う 1 面 用 
意 し て あり ます . 

自分 の ビー ム 砲 は 最初 の うち は 弾 が 単発 
で す が , 階級 が 少佐 が か ら は 連発 式 た なり ま 
+. 1 面 ご と の 自分 の 破壊 率 が 30% 以上 い 


( と 次 の 面 に 進め ます . それ 以下 な ら ば 自 
分 の 階級 が ハク 奪 る れ , 子 備 兵 と し て 例 の 
番外 編 の 面 … へ き 地 戦線 に 回 きれ て し まい 
ЁТ. 

そこ で も 30% 以 下 な ら ば , あな だ は クビ 
ほ 枯 つて し まい また 

それ 以上 な ら 6, も う 一 度 前 の 戦線 , 階級 
о し ます 。 


や は り ,。 こう いう リア デア デルタ イム ・ ゲ ー ム 
は その スピ ー ド が 命 で す . 

最初 , この ゲー ム の スピ ー ド は 今 の 半分 
ぐら いし か な か っ だ の で す が , 全面 的 な 見 
直し を は か っ だ た 結果, や っ と 今 の スピ ー ド 
に な っ だ の で す . 

その 手法 を いく つか 上 ば げ る と , まず 一 般 
的 な 方 法 し し て , テキ スト 画面 の 表示 を し 
な い . つま り DMA を 止め る , の 他 に 
①1 回 の 判定 で ど よ いも の は 1 回 どけ に する 。. 
イン デック ス 修 飾 は し な い . 
③ 裏 レジ スタ や スタ ッ ク ・ ポ イン タ を 有効 
的 に 利用 す る . 

が た 行なっ て いま えま す 、 

① は , つま り ゲ ー ム 中 に 港 に 到着 し た か 
どう か , な ど と いう の は 常に 判定 し て いな 
けれ ば な ら な い が 。 今 が 何 面 で . どの キャ 
ラク タ を 動か すか と いう よう な 判定 は 1 回 
TE UOTE 

だ か ら こ の 場合 は イニ シャ ライ ズ 時 に 
ログ ラム の オペ ラン ド 部 を 書き 変え る と い 
う よ う な こと を や っ て いま す 。 

(213, Z80 で イン デック ス 修 飾 を する 命 
令 は クロ ッ ク 数 が メチ ャ クチ ャ か か る だ ら め , 
当然 の ご と て く フ パス も ます: 

つま り , あの 8080A の よう 
ング を する の で す / 

③Z80 は イン デック ス 修 飾 や メモ リ を ア 
クセ ス す る 命令 は 遅く , レジ スタ 間 の 演算 
や デー タ の ロー ド は 速い (これ は 2Z80 の 命 
令 群 の 中 で は 最速 ).、 そし て , レジ スタ の 
数 が 豊富 に あり ます . 

し だ が っ て Z280 の 場合 , で きる だ け ワ ー 
PeUTLUC, AEV PDS “РБ 
スタ で デー タ の や り と り を する よう に し ま 
す . 


な プ ブログ ラミ 


( 迎 夢 奇人 ) 


87 


pio 


し か し 実際 に は これ で は レジ スタ が 足り 
な く な っ だ りす る こと が あり ます 。 

を あみ あ が 。 お あり が だ いて と に 之 80 に は 表 
面 上 の レジ スタ の 他 に 裏 に も 汎用 レジ スタ 
と 同じ 数 の レジ スタ が あり ます . それ を ワ 
ー ク ・ エ リア と し て 使う こと だ に より 。 ЖЖ 
化 が は か れ ま す . 

UAM 2 M に いで は 。 
PUSH, POP 命 令 や CALL 命 令 の と き に , 
ポイ ンタ と し て 使わ れる レジ スタ で す が , 
その 他 に は まっ た だ く 使 用 る きれ て いま せん . 


これ を 利用 し な い 手 は あり ませ ん . 
この PUSH, POP と いう 命令 は , 普通 


小惑星 出現 
フラ グ を 立て る 


Add. +O 4*1 42 + る +8 +9 
9000 O1 FF O1 OO O1 OO O1 OO O1 FF 
9010 01 OO O1 FF 01 OO O1 FF 01 FF 
?020 O1 FF OO FF O1 FF OO FF FF FF 
9050 FF FF FF.FF FF FF FF FF FF 00 
9040 FF OO FF O1 FF OO FF O1 FF OO 
9050 01 O1 01 OO O1 O1 O1 OO O1 01 
9060 01 OO O1 OO 01 OO O1 FF O1 ОО 
9070 01 FF 01 OO O1 FF O1 FF O1 FF 
9080 O1 FF O1 FF O1 FF OO FF OO FF 
9090 O1 FF OO FF OO FF OO FF OO FF 
90A0 ОО FF O1 FF OO FF ОО FF ОО FF 
OBO_ OO ҒҒ OO FF OO FF 01 FF OO FF 
9O0CO OO FF OO FF ОО FF ОО FF ОО FF 
ЗОрО OO FF OO FF O1 FF O1 OO O1 FF 
9OEO OO FF OO FF OO FF OO FF FF FF 
9OFO FF do FF ОО FF ОО FF ОО FF O1 


Ааа 


OJOO 


ー ク 


+A 
01 
O1 
oO 
FF 
оо 
01 
01 
o1 
01 
01 
оо 
00 
оо 
01 
FF 
FF 


+в 
оо 
ЕЕ 
ЕЕ 
оо 
01 
оо 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
01 
FF 
оо 


Sum 05 Fé 04 F7 OS F7 04 Fé 01 F7 05 ЕВ O3 F8 02 FS :р5 


+O +1 42 +3 +4 +5 +6 +7 +8 «9 +A +B «C +D +E +F Sum 


ケ コ ン ・ マ シン 語 入 門 」 の p. 8 と p.13 一 p.16 ま で 2, 


レジ スタ の 退避 と し て 使わ れ ま す が , 見 方 
を 変え る と , 一 度 に 2 バイ ト の デー タ を メ 
モリ に 書き 込む また は メモ リ か ら ロ ー ド 
まる よい うこ と が お ね お かり ます . し か も これ , 
メモ リ を アク セス する 命令 の 中 で は 最速 な 
OUT. 

この ゲー ム で は を その 特徴 を キャ ラク タ 
PUT, 画面 クリ ア に 利用 し て いま す . 


さん 


+C +E +F Sum 
O1 OO O1 FF :05 
O1 FF OO FF :01 
FF FF OO FF :F8 
FF OO FF FF :F3 
01 01 01 01 ғ02 
O1 OO 01 FF «ОА 
01 OO O1 FF :05 
O01 FF OO FF 100 
OO FF ОО FF :ЕС 
OO FF OO FF :ғА 
O1 FF OO FF : ҒА 
OO FF OO FF :Ғ9 
OO FF OO FF : ЕВ 
OO FF O1 FF :00 
FF FF FF OO :Е5 
FF O1 FF O1 :ЕВ 


今回 の この ゲー ム は ば は, Есе 色々 な こ 
と を 考 ん な が ら 作 っ だ た ので, ホン ト に 疲れ 
2-4,7 

難関 の 音楽 演奏 ルー チン の 方 も , 最初 の 
うち は 単なる 効果 音 を 出す で らい に し か 使 
っ て いな か っ だ の で , 後 で 音楽 も つけ よう 
と 思っ た と き に , その 適当 きる に 痛い 思い を し 
まし だ た (だ っ て 音楽 ほな ら 6 な いん だ を ん 


ゲー ム ・ オ ー バ ー 
フラ グ を 立て る 


01 01 00 
01 00 01 
01 00 01 
O1 FF O1 
FF FF FF 
FF O1 FF 
01 O1 01 
O1 OO O1 
01 00 O1 
01 ЕЕ ОО 
FF FF FF 
FF OO FF 
00 O1 01 
01 oo 

O1 FF 

01 FF 


01 01 O1 :0А 
01 oO FF 107 
OL FF OO :06 
OO. FF РЕ RE 
FF FF OO :F4 
FF O1 O1 :FE 
01 oO O1 :OC 
01 ОО FF :06 
ОЗ ЕЕ FF 303. 
ОО FF FF :FC 
FF FF 00 :F3 
оо O1 ОЗ FE 
01 oO : OR 
01 ОО :08 
01 FF :FD 
ЕМДЕР: ФЕВ 


FE 02 FC 07 FE 04 FF 07 FB 05 FD 114 


+5 +6 +7 +B +9 +A «B «C +D +E +F Sum 
FF ОО FF OO FF ОО FF OO FF O1 FF :FA 


> 6 月 号 の p.132 の CRAZY RAT š A, レジ スタ の 氏 と 上 L は MOVE 命 令 な ど に より , ほか の レジ スタ や , メモ リ に 移動 で どき ます . 詳し く は 「 ポ 
P.S. PC-1251 の 液晶 パネ ル が 壊れ て し まっ だ …、 い くら ぐら いか か る か 教え て くれ 
(ボツ に な っ た の は ペン ネー ム の せい だ と 思う Nob) 


pio 


リリ スト 1 階級 特進 WAR GAME マシ ン 語 リス ト 


9320 
9550 
9340 
9350 
9360 
9370 
9580 
9390 
зло 


+0 +1 42 + る +6 +7 +B +9 +A +B «C +D +E +F Sum 
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piO 


リリ スト 1 階級 特進 WAR GAME マシ ン 語 リス ト 


бд 
во 
07 
18 
oo 
оо 


Q っ Hey! PiO な アー チ ス ト (Key さ ん が 編集 後記 で 書く アー チ ス ト ) の 予想 ユー ナー で す . 7 月 号 で は 私 た ちの 子 想 を あざ けり 笑う か の よう 
ео) (о) ©) с, R3RCG RP i UK hai. まさ か 1 子 さ ん を 出す と は . し か し , 1 度 や 2 度 の 失敗 で は くじ け ま せん 。 さあ ー, いっ て みよ ー.・ 

X Өм LONE JUSTICE. - MEN AT WORK -KATRINA AND THE WAVES ・BRYAN ADAMS まあ , こん な も ん か な .。 うー ん , 
90 IU 2 当たる か な ? お っ と それ か ら ROD ほ BECK が 組ん で レ ュ ー ド を 出し まし た ね , な つか し い . 最後 に , 今月 の お すす め FM 番 組 で す . HH 


Де, 


リリ スト 1 階級 特進 WAR GAME マシ ン 語 リス ト 


+F 
F3 
79 
9E 
CF 
FF 
EO 
19 
19 
oo 
oo 
oo 
оо 
оо 
оо 
оо 


8 時 (FM 大 阪 で は の 話 )FM ス ー パ ー・ ミ クス チュ アー ワー ルド ・ ヒ ッ ト ・ チ ャ ー ト で す . それ で は , Good-by. (せい ろく 十 た ろ へ い ) 
娘 MTV で ロッ ド と ベッ ク の ビデ オ 見 まし た ョ . ベッ ク が 昔 と 変わ ら な く て , 異様 に 明る く て , カッ コ 良 か っ た . 予想 の 中 で は プラ イア ン ・ 
アダ ム ス が 一 番 好き . 円 
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pic 


Add 

BOOO 
BO10 
BO2O 
возо 
ВО4О 
возо 
BOGO 
BO70 
BOBO 
ВО9О 
BOAO 
ROBO 
BOCO 
EODO 
BOEO 
BOFO 


+0 +i +2 
^7 28 O3 
SD Oé 02 
OC 21 OO 
4D OO ЕВ 
21 21 42 
21-21 SC 
АЕ ОЕ o8 
OD 20 FS 
ED BO O1 
ED 73 B4 
25 72 23 
BO D3 SF 
23 7E -23 
FE 32 28 
CD B9 B7 
B5 3C FE 


+3 


+4 


+5 


マシ ン 語 リス ト 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


ーーーーーーーー ------....-..-...-----.-.------------.-.---..........-.-.--....---2-----------------------022-- 02---------- 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


7B 61 Bó 


47 


AB 


88 


25 OF 


B500~B6FF は すべ て 0 


EEOO 
BER1 O 
EE2O 
BRZO 
EE4O 
BBSO 
ЕВ6О 
ВВ7О 
EEBBO 
ВВ9О 
BRAO 
BBBO 


yp みなさ ん, お は よう ご ざい ます . EiO'85 年 1 月 号 に デ ロ グ ラム が 載っ た くら ます くん で す . と ころ で , 


1 月 号 の Up&Down は 面白 いで すね . 


プロ グラ ム を 見 る と , デバ ッ グ 用 と 思わ れる 空き エリ ア が か な りあ っ だ た ので, を そこ に プロ グラ ム を 追加 し て , ゲー ム を 自分 な り に アレ ンジ し 
て いま す . 内 容 は , ВЕЕР OFF が で きる , ゲー ム 中 の スコ ア 表示 , ゲー ム 中 の 強制 BEEP OFF に 強制 電源 OFF, HI-SCORE 時 の 名 前 登録 
と クリ ア し た 面 の 数 の 登録 BGM 機 能 , 以上 で す . 特に BGM は ゲー ム 中 に 絶え ず 音楽 を 奏で て お な おり, な か な か の も ん で す よ (自画 自賛 1?). 


pio 


リス ト 1 階級 特進 WAR GAME マシ ン 語 リス ト 


созо 
Со40 
CO5Q 
соёо 
Со70 
сово 
Со9о 
COAO 
CORO 


そる それから, JUMP キー は [SPACE| キ ー の 方 が 良い と 思い ます . ちな み に 僕 は [SPACE| キ ー に 変更 し て いま す . ここ まで や る に は , 当然 の こと 
な が ら 内 部 解析 を し な いと だ め な わけ で す が , ӘРЛІ i U k. A, それ か ら 最 近 PC-1500 は PC-12 系 に 押さ れ ぎ み で す が , あん な の に 
押さ れる な ん て 情け な いわ . 1500 は 偉大 な の だ りり ( 2 つめ は ボツ に な っ た くら ます くん ) 


1000 


1010 カイ キュ ウ F?:2 War Game Ver 1 


for  PC-8801/mk-II  N88-BAS 


1984 . 9. 


Programed Бу  k.Nari 
1050 
1060 CLEAR , &H8FFF 
1070 DEFINT A-Z 
1080 RANDOMIZE VAL (RIGHT$(TIMES$,2)) 
1090 ОРТІОМ BASE O:DIM ST$(20) 
1100 DEF LUSRO-z£&HCS64:DEF LUSR1-&HCA4S5S5:DEF 
USR2=%HB47ñ: DEF USR3Z&HCS6D 
1110 FOR I-O TO 7: СОЦОК= (1,1): МЕХТ 
1120 CONSOLE 0,25,0,1%:8СКЕЕМ 0,0 
1130 POKE £&HBS5OZ,O0:POKE £&HBS504,0 
1140 HIGH. SCORE=0 
1150 GOSUB *STRING . INIT 
1160 ' 
1170 *DEMO 
1180 WIDTH 80,25 
1190 CLEAR.DISP-USR3 (0) 
1200 START.FLAG-o 
1210 GOSUR *TITLE 

THEN *MAIN 

220 605068 *INFORMATION:IF START.FLAG« 30 
THEN *MAIN 
1230 GOSUR *GAME.DEMO 

1240 IF FEEK (%HRS232)< >O THEN *DEMO 
1250 ' 

12260 *MAIN 

1270 GAME. INIT=USR1 (0) 

1280 GAME. MAIN=USRO(O ) 

1290 CLS:WIDTH 40: HEFLAG-O 

1300 IF РЕЕК(УНВ52Е)<>0 THEN *GAME.OVER 
1510 GSCORE-FEEE (HES 1 S5) +ҒЕЕК CGHES16) *25 
6 

1320 TSCORE-ZFEEK (&HBS523) *FEEK (%НВ524) #25 
6 

1330 FAR.SCORE-GSCORE/TSCORE* 1 00 

1340 COLOR 1 

1550 STM$-ST$(O):LOCATE $5,7:GO0SUB *STRIN 
G. PUT 

1360 COLOR 7:LOCATE 15,7:FRINT USING "4$ 
#"; PAR. SCORE; 

15/0 COLOR 15РКІМТ " Z4"; 

1380 IF PEEK(&HBS2B)-1 THEN *HEKI.HANTEI 
1590 COLOR -SrBEEP 1 

1400 LOCATE 5,9:РКІМТ "ホー ナス "s: COLOR 7: 
PRINT USING "1000 x 4&":PEEKC(G&HBS18)-1 
1410 BEEF O 

1420 BOU-FEEK GHBSOS)-4FEEE (&HESO6) *256 
1430 BOU-BOU-*100* (FEEK C&HBS18) ~1 ) 

1440 РОКЕ &HBSOS,BOU MOD 256:РОКЕ &HBSO6 
, INT (BOU/ 256) 

1450 IF FEEK(&HBS17)-z8 THEN #GAME . END 
1460 IF FAR. SCORE“ 50 THEN HEFLAG=1: COUNT 
=4: COLOR.NO=S ELSE СООМТ= 1 : COLOR. NO=3 
1470 COLOR COLOR. NO 
1480 STM$=ST$ (COUNT) 
*STRING.FUT 

1490 STM$-ST$(COUNT-*-1)0:LOCATE 3,14: GUSUE 
*STRING.FUT 

1500 STM$s-ST$(COUNT-*-2) :LOCATE ' Z, 17: GOSUE 
*STRING. FUT 

1510 GOSUR #WAIT.LOOF.SUB 

1520 COLOR 6 

19530 BEEP 1 

1540 LOCATE 7,20:РКІМТ "PUSH RETURN KEY" 
1550 BEEP 0 

1560 LOCATE 25,20: АФ=ІМҒОТФ (1): IF A$<>CH 
R$(13) THEN 1560 

1570 IF HEFLAG-O THEN 1280 

ELSE FOKE &HBS2B,1:FUSH-FEEK (SHB 

517)-1:POKE &HB517,1:G0TO 1280 

1580 

1590 x*HEKI.HANTEI 

1600 IF FAR. SCORE 230 THEN COUNT-14: COLOR 
.NOz6:FOKE £&HBS2E,O0 

:РОКЕ &HBS517,FUSH:GOTO 1470 

1610 COLOR 2 

1620 STM$s-ST$(7):LOCATE 5,10:GOSUBR *STRI 
NG. FUT 

1630 5ТМ%-57%(8):10САТЕ 5,13:GO0SUE #STRI 
NG. FUT 

1640 STM$-ST$(9):LOCATE 5,16:GOSUR *STKI 
NG. FUT 

1650 COLOR 6 

1660 STM$-"GAME OVER": LOCATE 9, 4: Б050Е ж 
STRING. FUT 

1670 GOTO 1790 

1680 ' 

1690 x*GAME.OVER 

1700 COLOR 6 

1710 STM$-"GAME OVER" 

1720 LOCATE 9,4: GOSUB *STRING.FUT 

1730 COLOR 4 

1740 5ТМФ=5Т%Ф (10) :1 ОСАТЕ 7,10: GOSUB *STR 
ING. FUT 

1750 STM$=ST$(11):LOCATE 7,13: GOSUB *STR 
ING. FUT 

1760 COLOR 5 

1770 STM$=ST$ (12) : LOCATE 2, 17:60508 *STR 


sIF START.FLAG« 0 


: LOCATE 3,11: GOSUR 


「PiO の 〇 の 〇 」 


m リス ト グ 階級 特進 WAR САМЕ BASIC リ スト 


ING.FUT 

1780 GOSUE *HIGH.SCORE.HANTEI 
1790 GOSUB xWAIT.LOOF.SUB 

1800 COLOR 6 

1810 BEEF 1 

1920 LOCATE 9,235:PRINT "zz"? マタ ネ 
1830 BEEF О 

1840 GUSUE *WAIT.LOOF.SUR 

1850 GOTO *DEMO 

1860 ' 

1970 *GAME.END 

1880 COLOR 7 

1890 STM$-ST$(17):LOCATE 4,11:GOSUB *STR 
ING.FUT 

1900 STM$-ST$(18):LOCATE 4,13: GOSUE *STR 
ING. FUT 

1910 5ТМ%-57%(19):1ОСАТЕ 4, 15: Б050Е *STR 
ING. FUT 

1920 Б5ТМФ=5Т%Ф (20) s LOCATE 4,17: GOSUE *STR 
ING. FUT 

1930 60506 *HIGH.SCORE.HANTEI 

1940 GUSUE #WAIT. LOOF'. SUR 

1950 COLOR 6 

1960 STM$-"GAME OVER":LOCATE 9,4: Б050Е ж 
STRING. FUT 

1970 GOSUE *WAIT.LOOF.SUE 

1980 BEEF 1 

1990 LOCATE 7,22:FRINT "PUSH RETURN KEY" 


2000 BEEF O 

2010 LOCATE 25,25: АФ=ІМҒОТФ (1) : ІР A$<>CH 

КФ (15) THEN 2010 

2020 БОТО *DEMO 

2020. - 

2040 #HIGH. SCORE. HANTE I 

2050 SCORE=FEEK (&HR505) +FEEE: (&HB506) *256 

2060 IF SCORE-«-HIGH.SCORE THEN RETURN 

2070 FOKE &HBSOZ,FEEK(O&HBSOS):FOKE HESO 

4,РЕЕК C&HEBSO6) 

2080 HIGH.SCORE-SCORE 

2090 COLOR 2 

2100 STM$-ST$(13):LOCATE 7, 20: БОТО *STRI 

NG. FUT 

2110” 

2120 *GAME.DEMO 

2150 WIDTH 4O: COLOR 6 

2140 LOCATE 9,20:РКІМТ "FUSH LSFACEJ KEY 
1". 

2150 GAME. DEMO. SUEROUT INE-USR?2 (0) : COLOR 

7 

2160 RETURN 

2176. 7 

2180 «TITLE 

2190 QUT 81,0 

2200 FOR I-O TO 4 

2210 LINE(CI,I)-(659-I,199-1) ,6,R 

2220 NEXT 

2220 RESTORE *LINE.DATA 

2240 FOR Ісо TO 3 

2250 READ LINEDAT 

2260 L INE(X(LINEDAT,LINEDAT)-(639-LINEDA 

T,199-LINEDAT) ,6,B 

2270 NEXT 

2280 ВЕЕР 1:LINE(200,50)— (300,100) ,7, ВЕ: 

BEEP O 

2290 ВЕЕР 1:1 ІМЕ (250,80) – (350,150) ,2,BF: 

BEEF- О 

2500 BEEF 1:1 ІМЕ (500,100) = (550,180) ,1,BF 

s ВЕЕР O 

2510 WIDTH 80 

2:320 COLOR 4 


2550 LOCATE さ 。 3sPRINT " [== G = 
TEENS mm aman Hes ғ 
f ғ 
2540 LOCATE Z, 4:PRINT " m m EN шин 
f“ sm ғ ша |н 
Кее ся 
2550” LOCATE 5. ЗіРКІМТ " иш ш Е 
ч» шы ғ“ mw ра 
ип CS 
2360 LOCATE 3, 6:PRINT " | x шн шн 
AH m E 科 m | | ғ 
NW M. 
2570 LOCATE 2, 7:РКІМТ " m ums m" 
| m NU PES | 0 771 P d 
m m 
25BO0 LOCATE. 3, BsPRINT " m " X3 m 
т mw P d | в ~ 
Р ад 
2590 LOCATE 3, 9:РКІМТ " Е Nc саа | 
| m m mr. w м w ЕА а 


| 


2400 LOCATE 3,10:FRINT " 
2410 COLOR 5 


2420 LOCATE 5,14:ҒКІМТ " ШР т 
E 5 D R E Ша». 
ES 
2450 LOCATE 5,15:РКІМТ " Ш” と ш a 
” “ m п m "m s ~ m. 
пип 
2440 LOCATE 5,16:РКІМТ " B ЖЕНЕ». шп» 
` m m m п» ` HN 
пиш 
2450 LOCATE 5,17:РКІМТ " Ш mcm mm 
"i МЫ m m и нин 
| m шкив 
2460 LOCATE 5,18:РКІМТ " м ш E Z EH 


p DIRECTZ& A, Do コン ポ 見 まし た よ . 6 月 20 日 の 読売 新聞 ( ふ , ふる い ) の 夕刊 を 今 す ぐ あ け な さい . 
ot. それ に し て も 気持 ち 悪 い . 


P.S. ちなみに 私 は る る ん と 同い年 で す . 


линол а 
mu нам“ 


LOCATE 5,19:FRINT " 
m в 
m mum 
LOCATE S,20:PRINT " 
ии ж 

m mum 
LOCATE 5,21:PRINT " 


м. HERR 


ма = 
I] m m 


25500 

2510 FOR HALT.LOOF-O TO Soo 

2520 IF ІМҒ (9) =191 THEN START.FLAGz1:R 

ETURN ` 

2530 NEXT 

2940 CLS 2:CLS: RETURN 

2550 

2560 *xINFORMATION 

2570 FOR FALET=1 TO 5: СОЦОК= (РА ЕТ, 0) : NE 

XT 

29580. COLOR- (6,1) 

2590 ВЕЕР ІЗІ ІМЕ(110,0)-(120,199),6,ВҒіВ 

ЕЕР О 

2600 COLOR 5 

2610 LOCATE 2,5:РКІМТ "KEY SCAN" 

2620 RESTORE *RBOX.DATA 

2650 FOR Ісі TO 5 

2640 READ DAT,DAT1,DAT2,DATZ 

2650 LINE(DAT,DAT1)-(DAT2,DAT3) ,7,R 

2660 NEXT 

2670 RESTORE *FAINT.DATA 

2680 FOR Is1 TO S 

2690 READ DAT,DAT1,DAT2 

2700 FAINT (DAT , DAT1) , DATE 7 

2710 NEXT 

2720 COLOR 7 

2750 FOR 1=1 TO 6 

2740 READ DAT,DAT1,DAT2$ 

270 BEEF 1:LOCATE DAT,DAT1:FRINT DATZ 

$; : BEEF О 

2760 FOR WAIT.LOOF=0 TO 500: NEXT 

2770 NEXT 

2780 COLOR 4 

2790 LOCATE 2,21:FRINT "MISSILE" 

2800 COLOR 6 

2810 LOCATE 18, 2:PRINT " FEIN チキ ギュ ウ レ ルン ホ ? ウ 

хло 9 ININ- リコ リラ T JI hu 49, V Z: 977 

Де" 

2820 LOCATE 18, 4:РКІМТ " Pibe mI カラ 7 メイ ルイ 

2 AFIJO FOLIOS マウ サリ レタ жа oann 9T T2b 

л" 

2830 LOCATE 18, 

OUAIS EXE: 

2840 COLOR 3 

2850 LOCATE 18, 6:PRINT " FTL 
hoy ECTS тот оюут." 

2860 COLOR 6 

2870 LOCATE 18, 8:PRINT " 22" ココ ノ シレ ルポ イフ" ハハ 
カナ リ リョ ウジ シン テキ TIF" 1 カイ ノ 99n4*" 307 "a? 
ノリ 

2880 LOCATE 18, 9:РКІМТ "7+9 MM Wh カイ キ 

127 19 7077 QUOTE IM 

2890 COLOR 4 

2900 LOCATE 18,10:РКІМТ 

カイ ギ キュウリ) ショ ウイ 272. )" 

2910 COLOR 6 

2920 LOCATE 16; І2іІРКІМТ " YNE hy*aon n 

"Ll 9; 9":9"-— ギュ ウニ FNA 590947 マウ ワサ ルレ チ メチ 


や <J " 
Ae 


2930 LOCATE 48,14:PRINT " Уә? 942"/ チュ ウ 
y") タカ イ テ " リヤ ウス ルト カイ キュ ウ ハ タイ ショ ウニ YU жо" 

2940-ПСАТЕ 18,15: PRINT TEV SI TORT 
テモ ヨイ トイ ウ キ フ マリカ" PW/T"2." 

2950 COLOR 2 

2960 LOCATE 18,16:iPRINT " ( 
AE ME AC: 

2970 COLOR 5 

2980 LOCATE 18,18:PRINT " YFP УУУ! 79274 
жәл? 9:Jo— TORN “уп g"7?7T4T*"'vEO7" тӘ" 

2990 LOCATE 18,19:1PRINT "49"*4 Ял 92747 
TURA S34 BUS ЭН ゼイ セル キラ 797 NATU. POA 

3000 LOCATE 18,20:FRINT "ショ ウ カ ワシ テ 19239 5 
クニ ят ワラ ッ ソ マ シ ョ ウツ 1 。 " 

2010 GOSUR *WAIT.LOOF.SUE 

3020 COLOR 7 

ЗО ВЕЕР i:LOCATE 335,20 РКІМТ “FUSH Т 

SPACE 1 KEY"s:BEEF О 

5040 PFALET-O 

3050 FOR KEY.SCAN-O TO 50 

3060 FOR HALT.LOOF-O TO 200 

5070 IF ІМР(9)-191 THEN START.FLAG 
=1: GOTO *RKETURN. TO. MAIN 

2080 МЕХТ 

35090 COLOR- (FALET 。O) 

3100 NEW. FALLET=INT (КМО (1) *S*1) 

5110 IF NEW.FALET-zFALET THEN 2100 ELSE 
FALET=NEW. FALET 

3120 COLOR= (PALET, 1) 

3130 NEXT 

2140 *RETURN. TO. MAIN 

5150 FOR FALET-O TO 7 

5160 COLOR= (CFALET,FALET) 

3170 NEXT 

5180 RETURN 

SID ' 


SIPRINT!'UnftyoT COURT 


qom 


ナー チュウ キッ リグ" 


ほら , ある で し ょ 「 記 0O の し で ぐま 」 


これ に よる と る る ん は ナメ クジ に シャ ング プー を か け て , その 次 の 日 それ が ひか ら び て 死ぬ こと を 発見 し て , 
今 で も ナメ クジ を こん な 方 法 で 殺し て 喜ん で いる そう で す 。 УЉА, ファ ン 減 り ま す よ . 
AW. ДЕ; Б б) 


と いう こと で , みな きる ん も 何 か に 投稿 する と き に は 


P 


| リスト 2 グ 階級 特進 WAR GAME BASIC リ スト 


3580 #LINE. DATA 

5590 DATA 6,8,11,15 

5600 #ROX. DATA 

5610 DATA 320,65,953,85, 8,90,30,110, 
0,76,110 

5620 DATA 520,115,55,155, 15,147,70,164 
56350 #PAINT. DATA 

3640 DATA 40,70,1, 10,100,2, 70,100,5, 
0,120,4, 50,150,5 

X650 #EEY. SCAN. рата 

$660 DAUtA-5,9,8, 75; 190275 2,12,4, 8,12,6; 
asl. 

3670 DATA 2,19,5РАСЕ 


3200 *STRING. INIT 3380 ST 和 も (17) ニ リオ メ テ デー トウ の ウー 11!" 
5210 БТФ (0) = リガ" Ф394 10." 5590 ST$(18)2"hOhMOÓ *Z M ダイ ショ ウ 2" 
5220 STH IIT Jp9, FI 7 лот 9017 3400 5Т%Ф (19) ="239)7 29," 
" 3410 ST$(20)-"JLT" iya? УУУ" 25883... 
5250 STS (2у а 74937 トワ シン ЧҮШ? P" 3420 RETURN 
3240 ST$(3)z"'"*" ) ООММ ЕТУ 1/7? 2/7 3430 ' 
2I." 3440 *STRING.FUT 
AND. OTE сар ә !'!| JA жаттау!" 5450 FOR STRING.LEN-1 TO (ЕМ(5ТМӨ) 
D ТӨХ) =" ^q Еуту "Ao dT" 5460 INDEX$-MID$(STM$,STRING.LEN,1) 
ЕЕ ЗУ TO d*-K^ wr サオ ub ttt 5470 IF INDEX$«»" " THEN BEEF 1 
280 GT も (7)= ニ "キミ ハリ ウチ ュ ウ л лоюһ zn" 3480 FRINT INDEX$; 
2 5ТФ (8) ="Діт Ti." 3490 BEEP O 
3300 5ТФ (9) EN ジュウ ショ フウ Э 979794." 3500 FOR WAIT.LOOF-O TO 100:NEXT 
2 ST$(10)"9"»3»5 73" 9 ФЕМ" 5510 МЕХТ 
3320 57$ (11) = リセ ンジ シー 2072779, " 3520 RETURN 


33530 ST$(12)z"2"z390va? 97 7" S930 ' 
3340 ST$(123)-2"High Score 7"3 ... 3540 *WAIT.LOOF.SURB 
53550 ST$(14)z"2727 119° 09..." 5550 FOR WAIT.LOOF-O TO 1000:NEXT 


5260 5ST9((15)2'Jp7y"ÀM キソ PON 75?" 3560 RETURN 
5570 STS (14)=" tyty Z 29% 178539 " S490 - 


カメ レオ ン кыгы 


スト ー リ ー 
ここ は ジャ ング ル 。 あな だ は カメ レオ ン 図 1 エサ の 食べ 方 
C34. お な か の すい だ あな だ は , 中 を 食べ 
АТ; 
Ви? あな だ を 探し て いる 人 間 も い ま 
T. 見 つか る な Ax よう に 。 5 E x ТЕК カメ レオ ン 
^35. ② の 場所 に ハエ , チョ ウ が 出 た ら |2| キー を 押す と 舌 を 出し て 虫 を 取り ます . 
ゲー ム の 説明 


エサ は 3 種類 あり ます ( 表 1). エサ の 中 
で ハチ を 取っ て し まう と 刺さ きれ て し まい ま 
Ж. 

エサ の 取り 方 は , |1|2|3|%-сен 
ぞ れ の 場所 に エサ が 出 だ たら 押し て くだ さい . 
カメ レオ ン は 舌 を 出し て 虫 を 取り ます ( 図 
1). 図 3 ゲー ム ・ オ ー バ ー の 画面 

人 間 に 見 つか る と , カメ レオ ン の 後ろ の 
色 が 変わ り ま す . [| キー を 押す と 後ろ の & iB anMEovER]O(]— 
色 と 同 じ に な り ま すか ら 。 カメ レオ ン が 見 Sa asa = 
えな い 状 態 に し て 〈 く だき るい ( 較 2)。 見 えて Ро noni TEND 


いる と 左側 か ら 人 間 の 手 が 出 て , 捕まっ て 
8 [222 221 54 
ゲリラ が で て き て こん に ち は 


LE, 
GLUT, ミス マー ク が 3 個 付く と ゲー 

| bel) @ と ふ そ ろ くい ま 

ゲー ム 画 面 

あな た だ は 敵 地 に 置き 去り に る れ だ , mb 


0 0 

いそ うな 一 兵士 で す . 

を そこ で あな た だ は 戦車 を 奪い , 一 路 味方 の 
陣地 へ と 向かう の で し た . 
ゲー ム の 説明 

実に くだ ら な い ゲ ー ム で す . 両 わ き の ビ 
ル で は ゲリラ が 小銃 を 構え , 前 方 か ら は 敵 
の 戦車 が 迫っ て きま す . これ を [| SPACE | 
キー を 押し て や っ つけ て くだ さい. ui, 
[| は | で 左右 に 動き ます . 

を し て , 敵 の 弾 に 当たる と 1 台 減 り , 5 
台 や られ る と ゲー ム ・ オ ー バ ー で す . な お , 
得点 は 戦車 が 500 点 で ゲリラ が 100 点 で す . 


(最近 ます ます PiO っ た りん で ん ) 


95 


^Y 今月 の PiO な ゲー ム 


@FM- ノ シ 


ン 語 
“ап 


まま まま まま жӛзігізж 
を さ まま まま まき 
» 
Fitts: 
w i $iiiiiki 
まま まま #$$$3$ 
Ж фӛрірізі: 
ЕЕ: 1 : 
ЖЕКЕ E фіі?і? ЗЕ 
FFF} 


「 チ ャ コ ,。 超 き な さい 」「 だ れ 。 だれ だ ニャ 
ー. こん な 夜更け に 起こ す の は … ? 

チャ コ は 眠い 目 を こす りな が ら 超 きま し 
た . する と 見 た こと の な い 年 老い た ネコ が 
SE LT. 

Fral? すま な い が また, BOOBY 
TRAPPERS を 退治 し て ほし い . これ を 使 
っ て くれ 」 と 3 色 に 変化 する ボー ル を わた 
LL. 

"Bis ЖРА T$, 
ほぼ いい の で すか が 7 СИК と, 
「 私 に つい て 来 な さい 」 ЕШ, テレ ポー 
EUS Us 

ここ は …「 ネ コ の 死 の 館 PARTII 」 な の 
E で も あの と きよ り も 床 も は し ご も 冷た 


どこ へ べ 行け 


シリ ー ズ шз 


жжіжӛззізі: 


0 


ミラ クリ | 


ў 


ГЕВ 547 5. 私 は これ に て 帰る . た の ん 
だ よ 。 と 人 言い 。 消え まし た 。 する と 。 FAD 
開く 音 が し て な に か 出 て きま し た . 

さぁ , チャ コ . ミラ クル ・ ボ ー ル を 使っ 
て や っ つけ ろ ,/〆 

これ は PiO3 月 号 の 8001mk II 用 を NEW7 
に 移植 し た も の で す . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| vz7853600—6F9F 
スタ ー ト 5000 


動き ・ 操 作 性 әәә э 


チャ コ ニ ャ ン は 相変わらず か わい い 
で すね . 敵 の キャ ラク タ も 個性 が あ 
120, ミラ クル ・ ボ ー ル を 回 収 する 
と いう アイ デア も 良い で すね .(Key) 


999099909999099999999099909999 


ANHA 


モー タ よ り リ スト の 3600H 一 6F9FH š 
x e TI bk ik L C UIS UU 
ト ・ ア ドレ ス は 5000H で す . 

セー プ は , SAVEM "MIRACLE", & H3600, 
8. H6F9F, 8. Н5ООО |RETURN| と する と 
ロー ド の と き LOADM""//RIRETURN| C X 
ー ト ・ ス ター ト し ます . で きれ ば 入力 前 に 
CLEAR, 8. H35FF[RETURN| と し て くだ さい . 


ЖОЛ 


[2][4][6][8| そ キー で 移動 し , [5] — c 
止ま り ま す . [Z| キー で ジャ ンプ し , [x] 
ー で 左右 移動 中 に ミラ クル ・ ボ ー ル を 出し 
ます . ボー ル は 1 つ し か な い の で ちゃ ん と 
拾い に 行っ て くだ る さい. 

相手 は す で て 警告 灯 を 点 減 し た あと 出 て 
きま す の で 注意 し て 〈 く だ だ さい. TRAF 
PER は ボー ル に : 当 だ る と レッ ドス ライ ム 
に な り 戻 っ て 行き ます 。 マウ ス デ ス は ボー 
ル に 当 だ る と 消 た ます. 

7 面 か ら の BOMB は 3 階 に て 爆発 し ます 
の で 破片 に 気 を つけ て くだ る ぃ 

得点 は , 相手 …100 点 一 600 点 , 
30 点 。 に ん じん …770 点 , か ぎ … 


гу و‎ 
:250x3 t Z€ 


"uv. 

10.000 点 の 7%” も あり ます が , 
йі, ИГЕ СИЕЗ T. 

1 面 終了 は か ぎ を 6 個 と っ だ あと, 右上 の 
р ДЫ ка ЖАРЫ, が どり を すず 
べ で て と る と ボー ル の 威力 が な く な る の て 気 
TOM e s Sot 

10 面 以降 は , 相手 が と た きど き 速 く な り ま 
Т. 15 面 で “GIVE UP”" し ます . 


プロ グラ ム に 
つい て 


ッ パ レッ ト を 使っ て いま す . 重ね 合わ せ を 
大 を な く て も いい の で す が 色 が 少な く な る 
の で 残念 で す 。B.G.JM は イン ター バル ・ タ 
イマ 割り 込み に て 行なっ て いま す . キー 人 和信 
力 は 先行 入力 風 に 作り まし だ た が , どん な も 
ЖЕК БЕСТЕ! 

サブ プシ ステ ム に 表示 用 の ルー チン を 送り 
ゲー ムトー ルー チン は メイ シャ シネ チ 和 る に あお 
"4%. 

表示 する と き に サブ プ シ ステ ム に ラマ ンド を 
テ え そい ます 。、 また 相 近 の キャ ラテ タタ ・ デ 
— Я は 2 回 に わけ て 送っ て いま す 。 

サブ 用 と メイ ン 用 合わ せ て 5 回 に わけ て 
アセ ンプ ブル を し た だ だめ 。 ルー チン の 間 に 
ご みや デー タ が ま ざ っ て いま す 。 今回 は ア 
ドレ ス ・ マ ッ プ グ を 省略 し ます . ご めん ちゃ 
い . グ 


簡単 に 


Ле] 


な に が な ん で も 追い か け て 
227; 


人 見 知り を し て 近づき ませ 
ん . 


か いか い 近く へ 行く と 追い か け て き 


Т. 


いか し お 元気 に 館 の 中 を パト ロー ル 


に ゃ ー ま こ | 横 の 移動 が . チャ コ と シン 
クロ し て いま す 。 と っ て も 
いや み で す . 

チャ コ を さがし て 降り て き 
ET. 


マウ ス デ ス 


6809 も NEW7 の サブ シス テム 
か っ だ の で 4 箇月 以上 も か か っ て し まい ま 


も 知ら な 


72. WM om5otLJ:t 
すばらし き あ を 知り まし た . 


F fî 


チャ コ ニ ャ ン ・ シ リー ズ は 終わ り に する 
っ ETT, KE кы X 
りー を 作り ます 。 

あと 8086 も や っ て み だ い . 
が ほし い .。 88SR が は ほしい. 


NEW7 の 


あー あ 98m2 
77L4 が ほしい 


3 参考 文献 
1) 高畑 英樹 : “FM-7 高 速 ゲ ー ム 人 徹底 解 
1)”, РіО, No.2 一 "84 年 6 H5 


か き ぎ を ジャ ン ピ ン グ ・ キ ャ ッ チ 
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zm ン 』』「 モ ー プ 」 な ん て いう 言葉 が 飛び 出し て , 見 て いて ニヤ リ と し まし た . 
> Y. が 何と Z80 の ニモ ニッ ク で 書か が れ て いる ん で すね ー. どなた か ビデ 


どなた だ か ビデ オ を お ぉ お 持ち の 方 , 
と ん に や )。 そ も そう いえ ん ば ぼ 「 パ イラ ァ み 」、 の オー デニ ング に も あり まし た ね 


そし て 極め つけ は バハ ムー ト の プロ グラ ム を 変換 し た リス トノ / あ れ 
あの 全 リ スト を 公開 し て 
きす が 2Z80/ グ 二 伸 . 


だるい ( 何 を 勝手 が こと 言っ 


7 月 号 で は 生意気 に も ちい ちゃ も ん を 付け て 


pu 
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3 “6809 マ シン 語 プ ログ ラム 入門 "。 電波 5) 荒木 俊行 "チャコ ニャン ", マイ コン 


新聞 社 ゲー ム の 本 | 51, 工学 社 
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Add 1 ZADO OO OO OO OO OO OF ZC OO ОО OF SC OO ОО OC 30 OO :D2 
5600 ОС ° ° ZAEO OO FO ОО OO OO 50 ОЗ OO OO OC OO CO OO 33 ОЗ 3O :55 

SAI , *AFO OO ZC OO оо OO OO OO OO OO OO OO OO OO OO OO OO :3C 

5620 o oc 00 € ; DO 15A. || --------------------------------------------------------- 
5650 5:0 DC Sum: OO C4 ОЕ 50 06 DC 24 40 16 1А EA 70 54 41 51 30 :D2 

3640 DC Š 

5650 С - ° o 50 ОС ° Add +O +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum 

3660 оо OO OO OO ОО с э оо оо € ° ° BOO ОО ЕЗ ЗС ОО O3 OF C3 OO OC ЗЕ ҒО CO ОО FF FC OO :ҒА 

3670 оо oo оо оо C Ë く B1O OO FF FC ОО OO FF FC OO ОО ЗЕ FO OO OO 3F ҒО OO 154 

3680 ° эс ° || ZB2O OO ЗЕ FO ОО OO ОҒ CO ОО OO OF CO OO OO ЗЕ OO OO :0C 

3690 ZEZO ОО FC OO ОО O3 CF OO OO OF ОЗ CO OO OO OO OO OO :ñO 

здо s : *B4O OO FO 3C ОО 03 OO ОЗ OO OC OO OO СО OO OO ОО OO :FE 

ZABO ) ZB50 OO OO OO оо OO оо OO OO OO OO OO OO OO OO OO OO :00 

る 6CO C 2 oc 2 х 5 ZBO оо OO OO оо OO оо ОО OO ОО OO OO OO OO OO OO OO :00 
56ро 3 5В70 OO OO OO ОО OO ОО OO OO OO OO OO OO OO ОО OO OO :00 
さ 6EO ° 0 oc DC ・ ° さ BBO OO 55 3O ОО OC CF CC CO O3 ЗЕ F3 ОО OO FF FC OO :ҒА 
さ 6FO OC 5В90 ОО FF FC ОО ОО FF FC OO OO ЗЕ ҒО OO OO SF ҒО OO 1:154 
5ВАО ОО 3F ҒО OO ОО OF CO OO ОО OF CO ОО OO ОЗ ҒО OO :CO 


3700 C 8 9 2 ' 5ВЕО OO ОО OO OO ОО OO OO OO OO OO OO OO OO OO OO OO :00 
S2 kO 3€ з à 4 4 5ВЕО OO OO OO ОО OO OO OO OO OO OO OO OO OO OO OO OO :00 
3720 t DO s12 || --------------------------------------------------------- 
. 3730 à る CO OQ さ C ° SC 8 Sum: ОО BE АС ОО 21 BC ES 80 2D 2C O9 40 OO BE CB OO :А4 
3740 

3750 OO 0: 2 OQ DO = 8 DO 3. Аса +0 жі +2 +3 +4 +5 +6 +7 +8 +9 +A +В +C +D +E +F Sum 
5760 € 2 i 0.00 Q 8 Š 30 Q s く COO OO OO 00 00 OO OF CO OO OO FF FC OO OO OO OO OO :CA 
3770 OO OO OC > оо OO OO OO OO OO OO OC n T さ C1O OZ FF FF ОО ОҒ FF FF CO OO OO OO OO ЗЕ FF FF FO :FB 
5780 ОО С DC 5С20 FC CF FF FC OO OO OO OO ОЗ FF FF OO OO FF CO OO :86 
3790 ) 3 5С50 OZ FF FO ОО 03 FF FC OO OO FF FF OO OO OF FF FO :EC 
5780 20 C 3CA4O OO O3 OO ОО OO OO OO ОО OO FF ЕС ОО ОЗ FF FF OO giFF 


í... q s‏ سے 


ZE8O OO OO OO OO OO ЗЕ FC OO OO FF FF OO OO OO OO OO :59 
3E9O 05 FF FF CO O3 FF FF CO OO OO OO OO OF FF FF FO :7F 
TEAO ZF FF FF FC OO OO OO OO OO FF FF OO OO OF FO OO 1536 


Add +O +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +С +D +E +F Sum 
,SFOO0 оо O1 OO ОО ОО о5 40 ОО ОО 55 54 ОО О5 55 55 40 :DE 
3F10 OO 15 50 ОО OO 55 54 ОО 01 F3 DS OO O1 54 DS OO :Е1 
5Е20 05 55 55 40 05 55 55 40 05 45 55 40 O1 11 10 OO :DF 
5ЕЗО 05 11 04 OO 04 40 44 OO 14 10 41 OO 10 11 OO 50 :78 
ュ F40 OO O3 OO OO ОО ОҒ СО ОО ОО FF FC OO ОҒ FF FF CO :9А 
ҖЕ5О ОО ZF FO ОО OO FF FC OO ОЗ FF FF OO ОЗ 3C FF OO 1:69 
ュ F6O OF FF FF CO OF FF FF CO OF CF FF CO O3 55 30 OO 19D 


し まい まし た だ た 。 ごめんなさい. で も あら 探し し た わけ で は あり ませ ん . タダ "ンプ リス ト を 見 て て 目 に つい た の で す . =R. 5 月 号 か ら 買 い 始 め 
ИИ Ч е Е А 
( 初 登場 の 7 月 号 で PS. を 切ら れ た に も か か わら ず , また また 長い 文 と 長い マン ネー ム で 迫る MYOHBAN こ と 伊藤 隆幸 ) 
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ミラ クル ・ ボ ー ル マシ ン 語 リス ト 


まっ た くす ご いで すね ー./ メ ノ 新 機種 の 雨 わ られ . FM に X1 に PC に と 。 まっ た く 競争 で も し て る ん で すか ね ぇ . と に か く , その 波 で , 今 ま で 
頑張 っ て きた 旧 機 種 ス テー ザー は だ いぶ ショ ッ ク を 受け た ん ビ ゃ な いで すか 。 し か し , そん な こと は 気 に せ ず , お 互い 頑張 り ま せ う . P.S. 
うち の 学校 は ほとん ど が X1 ユ ー ザ ー で ある . ちな み に 私 は S1 が 欲し い , P6mkII ユ ー ザ ー で す . P.S.2 自分 は 快 人 る ん を 尊敬 し , ら ば さん 
と Tomoko る ん の ふぁ ん で , 本 屋 で マン が ガ ファ ン ロ ー ド を 読ん で 大 笑い し た ふと ぼ どき も の で す . 


f 


оо 


4E60 01 OO OO 02 02 02 04 O4 O4 OS OS 
4Е70 O1 ОЗ O1 ОЗ O4 04 OS OS OO OO O2 
4E80 05 05 O1 02 O1 OS O3 OO 02 O1 OO 
4Е90 OO 01 OO O2 O2 O2 OO O1 04 O1 FF 
4EAO OO O1 02 03 O4 OS OO O1 O2 ОЗ 04 
ДЕВО OO OO 01 O1 O2 O2 ОЗ ОЗ O4 04 05 
4ЕСО OO 02 ОЗ 04 OS O1 01 01 ОЗ 05 ОЗ 


(わた し の わた し の と も 一 は ,。 ろ ー で す と 一 の て 一 くん ) 
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04 
01 
04 


01 
оо 
05 


оз 
01 
01 


Add 

5300 
5510 
5520 
5220 
5540 
5550 
5360 
9370 
5580 
5590 
5%АО 
SSBO 
55СО 
5 る DO 
5ЗЕО 


pO 


ミラ クル ・ ボ ー ル マシ ン 語 リス ト 
84 27 O2 60 O1 86 01 


5500 
5510 
5520 
5530 
5540 
5550 
5560 
5570 
5580 
5590 
SSAO 


5600 
5610 
5620 
5630 
5640 
5650 
5660 : 
5670 
5680 
5690 
56до 
5660 


»ТА 8р.1860 '2- Zrz—vfBiB, & A. 僕 も 「 ネ バー エン ディ ング ・ ス トー リー」 を 見 まし た が , た だ た だ ,「 す ば らし い 」 と 感動 し ま 
し た だ た. SFX の すばらし る も る る こと な が ら ,。 スト ー リ ー の すばらし き は 他 に 類 を 見 ませ ん . 特に 岩 喰い 男 ロ ッ ク バ イダ ーー が ,「 オ レ は 仲 問 を 
救え を な か っ だ 」 と 話す シー ン や , 宇宙 空間 に そびえ ぇ 立つ 象 の 息 の 塔 の シー ン は 印象 的 で し た . この 映画 で , 僕 は 「 夢 を 忘れ て は な ら 6 ない 」 と 
惜 っ た の で す . 「 ま る 3 日 も 社会 復帰 で き な か っ た 」 と の こと で す が 。 僕 な ど は 1 週間 近く メシ が の ど を 通ら な く て 苦労 し まし た . PSI 


БЮ 


Add +O 
SFOO 01 
SF10 FC 
SF20 ОО 
SF30 AD 
SF40 25 
SFSO ЗА 
SF60 86 
9F70 OE 
SF80 оо 
SF90 ОО 
ӘҒАО ОО 
SFBO ОО 
SFCO ОО 


---------------- ーー ------ 
---- -- ------------.-.....---.------------------------------------------------------------------------ 


--------------------------------------------.---------------------------------------------------------------------- 


= — а M یت‎ ке — A M «ее کے‎ ке» e کے‎ — — M «е — «е «же «е «е «ме n «ее e «ке «е — n «ке «же «е» кен «ә “ә e — n i o e e س — — م‎ а 


6:300 17 


ん な で 中 沢 啓治 先生 の 漫画 を 読み まし ょ う / 


= 
04 


P.S.2 乱文 失礼 / 


ミラ クル ・ ボ ポ ボール マシ ン 語 リス ト 


+D +E +F Sum : 6310 
B7 50 F9 :5D 6320 
Có O4 ДЕ :48 6330 
27 11 86 :8E 6340 
26 E7 39 Fé 6350 
ED 02 8D :7A 6:60 
16 8E 4D :4F 6370 
17 FE SO :71 6380 
1E 17 FE :1B 6390 
ОВ EC C1 :65 здо 


оо OO OO :B8 зво 
ОЗ B7 50 :9В 63CO 


6500 
+D +E +F Sum 6510 
39 CC O1 :24 6520 
1F O1 7F F6 6550 


82 BF FC 437 6540 
SF 26 F8 :ЕЗ 6550 
8B OS SC :6E 6560 
82 BF FC :7D 6570 
2B OS Ві sFO 6580 
24 24 OB :А2 6590 
29 26 O6 1CD 65A0 


(ボツ の 嫌い な 労働 乱 奈 ) 
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Add +O +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D «E +F Sum 
6COO 24 ОС 86 50 58 58 3D iF O1 35 O2 30 86 59 ВЕ OO :C7 
eCio ОО 55 82 ОО OO OO OO ОО СО OO ОО ОЗ ҒО CO oo OF 
6С2О ЕЗ ҒО ОО OF FF FO ОО ЗЕ FF FO ОЗ ЗЕ FF FO OC ЕЗ 
СЗО ҒЗ FC OS FF ҒҒ ҒҒ ЕЗ ЗС OF CF FC OF ЗЕ ЗЕ FF ОЗ 
GEAOFS3 FF FF 05:03 ҒЕ-ЕС 67-20 FF ЗС оз 01 CO OC 00 
6690.00 CO 20- ӨО 00 OO бо 00 CO OO ООо 03 FO СО OO OF 
6С60 33 ҒО OO OF FF 30 OO ЗЕ FF FO ОЗ 3F FF FO OC F3 
eC70 ЕЗ FC ОЗ FF FF FF F3 ЗС OF FF FC ОҒ ЗЕ FF FF ОЗ 
6 じ BO FF FF FF 05 FF FF FC 07 OO FF SC OS O1 CO ОС OO 
6290 00 CO 50.00 DO 00-00 03 FO CO OO OF F3 FO OO OF 
«САО FF ҒО ОО ЗЕ FF FO 30 ЗЕ FF FO OC ЕЗ Fš FC ОЗ FF 
СВО FF o FF FZ. 3C ОҒ CF FC OF ЗЕ ЗЕ ЕР ӨЗ FC FF ЕЕ Or 
6CCO OS.FF FC SC 30 FF 3C 00 05 CO OF OO OF оз оо 
eCDo оо оо OO OO CO OO OO O3 FO СО оо OF Z3 оо OF 
СЕО FF 30 OO SF FF ҒО ЗО SF FF FO OC ЕХ FX OS-FF 
6 じ FO FF FF F3 3C OF ЕЕ ЕС OF ЗЕ FF FF ОЗ FF ЛЕ ЕР 


Sum: 21 B4 4E А4 22 21 АҒ C5 2С ЗЕ 9D E2 ҒА 2D CZ 44 :96 


Acid +0 +1 +2 +3 +4 +5 +6 +7 +8 49 +A +B +C +E +F Sum 
SDOO RF PF FC 32 00 FF ЖС OO ОЗ CO OF OO. OP OO OF OO- :55 
&DiO.O00-OO0.QO OO OO OO OOOO O0 OX бо OO O3. € CO OO :DS 
6020 OF CF FO OO OF FF FO CO OF FF FC 30 ОҒ FÜ CO- 490 
D30 ЗЕ CF CF CF FF FF FF ЗЕ ЕЗ FO SC FF FC FC FO FF :ED 
ム 6D40 FF ЗҒ. СО ЗЕ FF. CO CO. 3SC.FF OC EO ジ O ОЗ > CO 18 : АДЕ 
зс. 0:5-O0 OO OO ОО OO OO OO 00 ОЗ ОС OO - ӨЗ OF СООО 
6D60 OF CC ҒО OO OC FF FO CO OF FF FC ` SO OF "PD GRO 
6D70 ЗЕ CF CF СЕ FF FF FF SF FF FO 3C FF FF DL FORE 
ら 6D8O FF FF CO SF FF ҒҒ CO С FF OO EO 70 03 D. COIS 
&D90 оз оо OO OO OO 03 OO OO OZ OF CO OO OF CF FO OO 
6DAO ОҒ FF FO OC OF FF FC 30 OF FF FC CO SF CF CF 
6DBO FF FF FF ЗР ЕЗ FO SC FF FC FC FO FF ҒҒ SF CO SF 
DCO- PF: CO FO SC FF OC SC. ' PO OS Соз? CO QOO FO OQ 00 
DDO оо оо OO OO OO O3 OO OO O3 OF CO OO OF FO OO 
ら 6DEO OC FF FO OC OF FF FC 50 OF FF FC CO, SF CF CF 
6DFO FF FF FF SF FF FO 3C FF FF FC ҒО FF FF FF CO ЗЕ 


Sum: B7 52 СВ 2А 26 АА 46 C4 33 84 97 7С CE 7B 09 СА 


Add +O +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +Е +Е 
©ЕОО FF FF FO 3C FF OO 3C FO OZ CO ОО CO ОО оо оо 
6E10 00 00 OO OO OC OC OO OO ЗЕ ЗЕ ОО ОО FF CO оо 
6E20 FF FF CO ОЗ FF FF FO ОЗ FF FF FO OF FF FC 33 
6E さ O FF FF FO 30 OO OO OO OC 7F FF ВЕ O1 FF ЕЗ O3 
&Е4О FF FF FO O3 FF СЕ FO ОЗ FF OF FO 01 ЕС ЗЕ ЕЗ ЗС 
6E5O 70 FF BE OO OC OC OO OO 3F ЗЕ OO ОО FF CO oo 
&E60 FF FF CO ОЗ FF FF FO OZ FF FF FO OF FF FC 33 
6E70 FF FF FO 30 2A АА OO OC 7F FF BE O1 FF ЕЗ O3 
ЕВО FF FF ҒО O3 FF CF FO ОЗ FF OF FO O1 FC ЗЕ ЕЗ 3C 
6E90 70 FF BE OO OC OC OO ОО 3F ЗЕ OO ОО FF CO oo 
ФЕАО FF FF СО ОЗ FF FF FO ОЗ FF FF FO OF FF FC 03 
6EBO FF FF ЕЗ ОО OO 00 ОЗ 1С 7F FF BC 

ФЕСО FF FF FO 05 FF ЗЕ FO ОЗ FC FF ҒО 

ЕО FO FF ВЕ OO OC OC OO ОО ЗЕ 3F oo 

&EEO FF FF СО O3 FF FF FO 05 FF FF FO 

6EFO FF FF ЕЗ OO 2A АА O3 1C 7F FF 


SD D2 55 F1 D1 


Add +0 +1 Z +4 +5 +6 +7 +8 +9 

6FOO FF FF FF 3F FO ОЗ FC FF 
6F10 FO FF OC OC OO OO ЗЕ ЗЕ ОО OO FF 
6F20 FF FF СО ОЗ FF FF FO ОЗ ЕЗ ЕЗ FO ОЗ FF 
6F3O FC OF FF 3F FO 50 OO OO ОО OF FF 
қ 6Е4О FF FF ) FF FF FF OC 33 ЕЗ СЗ ОЗ FC 
OO sc 6F5O FF ЗЕ 5С OC OC OO OO ЗЕ さ F ОО ОО ЕЗ 
84 6F6O FF FF СО O3 FF FF FO ОЗ F3 ЕЗ ҒО OZ FF 
‚ 8D 6F7O FC OF FF ЗЕ FO 50 2А АА ОО OF FF 
7D 6FBO FF FF FF FF FF OC 33 F3 C3 O3 FC 
51 6F9O FF ЗЕ OO оо OO OO OO оо OO OO оо 


11 Di AE 81 ҒО F3 


OOOO 人 人 人 人 人 人 信人 人 人 信人 人 人 人 人 人 人 人 人 人 人 人 人 信人 人 人 人 信人 人 信人 人 人 人 人 人 
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3 fj 格 的 コン ポ ・ (йш 5 
CD プレ イヤ ー EE e quu e 
NE (fn&) Ұ79, 
CD 909 Шана. 日 本 電気 ホー ム エ レ ク 


画 日 本 電気 ホー ム エ レ クト ロニ クス (株 ) + ど 充 実 し た アナ ログ 部 光 ヘ ッ ド は 3 ピー トロ ニク ス ( 株 ) 総務 部 広報 室 

U, デジ タル ・ サ ウン ド を 手軽 に 楽し め る ム 型 を 採用 際 使い や すい ワイ ヤレ ス ・ リ モ | 9108 東京 都 港 区 芝 5-37-8 住 友 三 田 ビル 
高 性 能 CD プレ イヤ ー“CD-509" が 発売 され コン を 標準 装備 区 ワン タッ チ ・ イ イージー オォ | 2(03454-5111C 大 代表 ) 

EU. ペレ ーション 見 や すい 大 型 デ ィ ス プシ レイ 

《 特 徴 》 を 採用 罰 15 曲 ラム ダム ・ メ モリ 演奏 機能 , 

P CD プレ イマ ヤー 専用 の *16 ビ ッ ト ・ デ ジ タ 2 XA IML r RR, 4a cuu X 

ルフ フィルタ” を 搭載 区 電源 の 低 イ ン ピ ー ダ ッ プ 選曲 な どの 多彩 な 機能 上 eCD の 近い 将 

УЖЕ, ハイ クオ リティ ・ フ パー ツ の 採用 な 来 を 見 込ん だ “サブ プ ・ ュ ユ コード 出力 端子 "を 


p この あい だ , 某 く ま ざ わ 書店 グリ ナー ド 永 山 店 で な ん の 気 な し に “コン バッ 〇 ・ マ ガ ジ の 〇 の" を 立 み 読み し て いた だ たら ,。 な , な ,。 な ん と 「 迎 
当 ・ 区 -1」 と いう エア ー ガ ン が ある ん じゃ な いで すか / 私 は カッ 飛 びました ね , ハッ キリ いっ て / ノ ちなみに お 値段 は \19.000.、 パソ コン の X- 
1 が 買え な い 人 は , 20 UM. X-1, を 買っ て マッ チ 条 で も 倒し て 気 を ま ぎ ざら わ し て くだ さい . Р.5. そ 一 いえ ば 車 に も 「 ミ ラノ ・X-1」 
っ て いう の が あっ だ よー な 気 も する が ※…. (GRinBee 影 丸 は 高 1) 
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FM- ノ シリ ー ズ 


BASIC 


&°7°2 アノ マエ ニー 999° Р PIN 
ナナ 337 атеш. 


PA. 
OYE, チー チオ マズ 。 


Py) FFU. ウザ チキ" サフ リリ 、 BOOT 3. 
932 АПШ". AFF 0797 イオ マズ 。 


REIL. OFF В. 2297 


ナニー 572549722. 


тез N. テー テキ イッ プク 。 79” Ул" ЗЫЛ" ХА. 


тмон колл” >>> 


Htt- 


ここ 不思議 森 の 近く に ある ボブ プ 君 の う 
ち は , 昔 か ら こ の 森 の 管理 や 動物 た ちの 世 
話 を ま か さ れ て いた . 

し か し , 今年 は 笠 が と て も 長く , 吹雪 が 
続い て いる . 

「 こ の まま で は 動物 た ち が 死 ん で し まう 」 
と 心配 し た ボブ プ 君 の お 父さん は , + Z= 
言っ た . 

「 お 前 も も う 立 派 に 仕事 を や れる 年 齢 に な 
っ た . 森 の 様子 を 見 て , 適切 な 行動 を と る 
の だ 」 

次 の 朝 , 都合 よく 吹雪 は や ん で いた …. 


YAYAYAYAYAYAYAVAYAYAYAYAYAYAYAYAYAYAYA 


プロ グラ ム は 4 つ に 分 か れ て お り , リス 
F 1 は ロー ダー で す . 
ゴミ の 中 に は 何 が ? 


リス ト 2 は 話 の 第 1 章 


WARI РИО, ою VOI ғал FRED. 


1000 
kamatachi-By k.t- 
1010 '" -PART-1- 


1020 RESTORE 1520:ҒОК NO-1 TO A4:READ РЕФ 


KEY МО,РЕФ+СНКФ (12) : МЕХТ 


1050 FOR F=1 TO 2:PLAY "обс52752а52ғ752с5 


2e52f16","oó6d32r32e32r32d32f 52916": NEXT 
1040 WIDTH 40, 20: LOCATE 0,2 

1050 PRINT:PRINT ӨРС(2) "== トト "コカ ラ 7-49 
Jy" УЭЛ ==" 
1060 PRINT:FRINT SPC(5); "1 ショ ウ カ ラ 

1 уе 

1070 PRINT:PRINT 5РС (5) "2 > 

2 y ы 

1080 PRINT:PRINT -8РС (5) "3 ショ ウ カ ラ 


оу 


1090 ON INSTR("123",INPUT$(1))*1 GOTO 10. 


90,1100,1110,1120 
1100 PRINT:PRINT SPC (5) $; "No. "$ "1": БОБОВ 
1130: LOAD "ADV. GM. 1" ,R 


1000 


Ф (40) HAV (20) „555% (15) ,УУУ%(15) 


1020 Рійу"обас22952е52+52а5206сз2г805 


-ADVENTURE-GAME-Fushigi Mori No Na 


1010 CLEAR 500: DIM SMM$(295),MME$ (20) ,LMO 


32 


ЖҰЛҰАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТАТА 


ンチ ャ ー です. ボブ 君 と 一 緒 に 動物 た ち を 
助け て あげ て くだ さい . 


較 プ ログ ラム ・ イ インフォメーション 


E | BASIC 


よく 考え て 作っ て あり ます . も う 少 
し , 絵 と か 音楽 な ど を 付け て 演出 を 
し て 欲し か っ た と 思い ます . (Key) 


に な っ て いて , ボブ プ 君 が 不思議 森 に 入る 
RTT. 

リス ト 3 は ボロ 小屋 に 関す る 話 の 第 2 章 , 
リス ト 4 が 第 3 章 で , 動物 た な ち を 最終 的 に 助 
ける 話 で す . 

ファ イル ・ ネ ー ム は 順に , “ADVLOAD", 
"ADV.GM.1", "ADV.GM 2", "ADV.GM.3" 
で セー アダ し て (だ きい . 
"ADV.LOAD" を RUN す れ ば 自動 的 に 
次 の ファ イル を 読み 込み , ゲー ム が 始ま り 
ET. 


この ゲー ム は カタ カナ 表示 , カタ カナ 人 入 


カカ で 話 を 進め て 行き ます . 入力 で きる キー 


リリ スト 1 ADV.LOAD BASIC リ スト 


1110 РКІМТ:РКІМТ SPC (5); "No. "$ "2"sLOAD " 
ADV. GM. 2" , R 

1120 PRINT:PRINT SFC (5); "No. "$ "3":LOAD " 
ADV. GM. 3" , R 

1130 FOR ТМ=0 TO 5000: NEXT 

1140 GOSUB 1170:GOSUB 1220: LINE (0,140) 一 ( 
640,188) ,PRESET, , BF 

1150 COLOR-(1,0):COLOR- (2,0) : COLOR» (6,0) 
:GOSUB 1190 

1160 FOR II-1 TO 5000: МЕХТ: RETURN 

1170 FOR Ісі TO 7:COLORs(I,O):NEXT: WIDTH 
80,25: RESTORE 

1180 READ Y,PR$:FOR І-О TO 3: SYMEOL (95-І 
*2,Y) ,PR$,4,2, 1: NEXT 

1190 READ Y,C,PR$,CC: LGSLEN(PR$) : X= (639- 
16*LG) /2 

1200 FOR 1=0 ТО 2:8YMBOL (X*I,Y) ,FR$,2,1, 

C:NEXT 

1210 IF CC--1 THEN RETURN ELSE FOR К=0 Т 

0 SOO:NEXT:COLOR-(C,CC):GOTO 1190 


リス トク ADV.GM.1 BASIC リ スト 


rió6oóc" 
1030 FOR І=0 TO 200 STEP 2 ІМЕ(О,1)-(64 
O,I),AND,O:NEXT:FOR 1=196 TO 1 STEF -*:L 
ІМЕ(0,1)-(640,1) ,AND,O: NEXT: FOR I=? T 


kEZERAT.D]e[][]ePF&—oi 
ー4( ロ ー ダ ー で 定義 し て いる ) と [| キー と 
[SPACE | キー で す . 

キー 入力 は , ソリ ーー ミル, 
よう 5 奉じ て で で だ を ん 
何 か 道具 を 使う と き は , カギ ー ツ カウ と 
し て か ら ド アー ア ケ ル な どの よう に 入力 し 
TOR PT. 


キタ ーー スス ム 


リス ト 2 一 4( 第 1 章 一 第 3 章 ) の 1000 行 一 
1390 行 まで は , どれ も 同じ ゲロ グラ ム で , 
画面 消去 , 文字 表示 , キー 入力 な どの サ デ 
ルー チン で す . それ 以後 は 場面 で の 判断 t, 
DATA 文 で 構成 され て いま す . 

場面 数 は 32 面 と . そん な に 多く あり ませ 


AD, 行っ だ り 来 だ りす る と ころ な ども あ 
っ だ り し て ,。 な か な か 広く 感じ る の で は な 


С 3799", 

内 容 は 女 の 人 で も 楽に 理解 で きる の で は 
な いか と 思い ます よ 。 

表示 る れる 文字 は , 次 々 と スク ロー ル し 
ます の で , 読み 切れ な いと き は | ESC | を 
押し て くだ る さる い . 

初め て 作っ た だ た アドベンチャー ゲー ム な の 
C, 考え ぇ 方 が 貧困 に な っ て いる と ころ も あ 
る か も し れ ま せん が , 全体 的 に 見 て 面白 い 
ゲー ム に な っ た だ と 思い ます . J 


1220 K$=INPUT$(1):IF K$<>CHR$(&HD) THEN 
1220 ELSE RETURN 

1230 

1240 DATA 010,29%“ モリ ノ 7Лл7?%,060,7, Intr 
oducion ,7,080,53,U*"7/ Tr "2" 。」。4 
1250 DATA 100,4,T$"2/ オウ チノ シコ "トバ 、 23:75 t 
Uy ジリ フナ シダ 。 」。 4 

1260 DATA 120,5,'Z2Th ヤヤ ウソ フシ タン タ " UES 
2" トラヤ ル ゅ テ ! 」。 4 

1270 DATA 140,6,77;9/9У ту ヨ フ ネム ゅ テオ コウ 。 
"ET. 

1280 DATA 160,2, г2 2 
it Return Кеу.,1 

1290 DATA ООО,О, ,-1,140,2,>> ナオ コノ ケ " ー ム テ 
"n #1772 チ ホ ウラ 27997,2 

1300 DATA 160,6, ム シシ ニタ К 7° 9993“. міз ао 


yy 


ТЕТЕ 1:2,180,1,Н 


р “,1,000,0, 3*1 
1320 DATA ЕЛ”: 


2: 


99 STEP 5ШІМЕ(0,1)-(640,1) , AND. O:NEXT 
1040 FOR С=1 ТО 7:ULOLOR-(C,C) : NEXT: WIDTH 
80,25: CONSOLE 4,18,0,0 

1050 LINE (0,0)- (640,32) ,PSET,1,BF 


103 


РіО 


リス トク ADV.GM.1 BASIC リ スト 


1060 FOR FESO TO 2:5YMBDÜL CPF 425,9) PF に 

EY SET “ЕРІ に カリ ジュ スス ム “БЕЗ 29 RAR 215 

415YMBDL (PF--200,21),"'PF$ ETS ススム” “PFA 

ЖӘ スム "ҮЛ, E NEXT 

1070 FOR РЕ=0 TO 32 STEF 2:1 ІМЕ(О,РҒ)-(6 

40,PF) ,XOR,1:NEXT 

1080 GOTO 1410 

1090-7 

1100 READ KAI:FOR ККК=1 TO KAI:PLAY"o7có6 

4r 32c64" 

1110 READ COL,MLG,LMJ$ 

1120 LMJ-LEN(LMJ$):FOR Ізі TO LMJ:LMO$ 
(1) =МІрФ (1 МЈФ,1,1) : NEXT 

1130 FOR Ізі TO LMJ:FOR J-O TO 2:<5ҮМЕО 

L(16*MLG*-16*1-J,168) ,LMO$(I) ,2,1,COL 
1140 МЕХТ:МЕХТ 

1150 LOCATE 0,21:РКІМТ:РБІМТ:МЕХТ 

1160 IF COL^7 THEN RETURN 

DIZO 7 

1180 PLAY"o6c64d64e64f 3298": SMM も =" コ ウイ ウト キ 
トウ スル モノ カナ >>>": SM=LEN ( SMM を) 

1190 FOR SS=1 TO 5М:5ММ% (55) =М1р% (5ММ%Ф ,5 

5,1) :NEXT 

1200 FOR 55=1 TO SM:FOR Ј=0 TO 2: SYMBOL ( 
16*88*J,176) ,SMM$ (55) ‚2,1,7: МЕХТ: NEXT 
1210 MK$-INFUT$(1):PLAY"oó6có4" 

1220 IF МК%>-СНК%(%НА1) AND ME$z-CHR$(&H 

DF) OR Mk$-" " THEN 1230 ELSE IF MEK ま =CHR 

$(8) THEN 1250 ELSE IF Mk$-CHR$(13) THEN 
1260 ELSE 1210 

11220 IF KU-15 THEN 1210 ELSE KU-KU-1:MME 

$ (КО) =МКФ 

1240 FOR І=0 ТО 2:SYMBOL (16X*KU*I*220,176 

.) ‚ММКФ (KU) ,2,1,4: NEXT: БОТО 1210 
250 IF КО=0 THEN 1210 ELSE LINE (16#KU+3 

20,176) -(16#EU+ 336,184) , AND,O, BF: KU-EU-1 
:00T0 1210 

1260 FOR I-1 TO KU: SV$-SV$-MME$ (І) :NEXT: 

FLAY"oSfióriófilórió6fió6" 
1270 SPS-INSTR(1,SV$," 

EN 1280 ELSE 1290 

1280 FOR し =176 TO 200 STEF Z2:LINE(O,L)-( 

640,L) ,FSET,O:NEXT:FOR し =177 TO 200 STEP 
2:1 ІМЕ (0,1) ~ (640,1) ,PSET,O: NEXT: SV$z""; 

KU:-OsGOTO 1180 

1290 ӘРІ -і ЕМ(59У%) :5%-МІр%(5У%,1,5Р5):У%- 

MID$(SV$,SPS4*2,SPL) 

1300 IF S$-"" ОК 5%-" " THEN 1340 

1310 SSS-LEN(S$):FO0R O-1 TO 555:555%(0)- 

CHR$ (ASC (MID$(S$,0,10) -XH70) : 55%=55%+555 

$ (О) : NEXT: 5%=55%: 55%=" " 

1520 IF V$z"" OR INSTR(1,V$," ")«LEN(V$) 
AND INSTR(1,V$," ")5O0 THEN 1340 

1550 VVV-LEN(V$):FOR 0=1 TO УММ: УУЧ (0) = 

СНК% (ASC (MID$(V$,0,120)—-2H70) : VV$=VV$+VVV 

Ф (0) : NEXT: V$-VUV$z:VV$-"":GOSUR 1360: RETUR 

N 

1:40 S*$="";SSS$="";V$=""; VVV$="" y KU=0: GO 
SUB 1360:GOTO 1180 

1390. шы 

1360 FOR Lz176 TO 184 STEF 2:LINE(O,L)-( 
640,L) ,FSET,O:NEXTs:sFOR し =177 TO 184 STEP 
2:sLINE(O,U)—-(640,L) 。PSET О: NEXT: SV$z""; 
КО=0: RETURN 

1370 d 

1380 FOR L=175 TO 52 STEP -Ss:LINE(O,L)-( 
640,L) ,AND,O:NEXT:FOR し =174 TO 22 STEP - 
S:sLINE(O,L)—(640,L) ,AND,O: NEXT: FOR L-173 
TO 32 STEP -S:LINE(O,L)—(640,L) ,AND,O:N 


IES SRST TH 


` 


EXT 

1290 RETURN 

1400 ' 

1410 RESTORE 2270: GOSUBR 1100 

1420 IF V$-"'i" THEN 1420 ELSE 1460 

1450 IF 5%-"ОҺ" THEN RESTORE 2550: БОТО 1 

S30 ; 

1440 IF S$="]nmTC" THEN RESTORE 2340: GOT 

0 1530 

1450 IF S$-"DkE" THEN RESTORE 2350: GOTO 1 

S30 

1460 IF V$-"Ehi" AND S$-"Oh" AND SRI-O А) 

ND HAV (3) =0 THEN RESTORE 2340: SRI-1:GOTO 
1530 

1470 IF V$-"Ti" AND S$z"^nC" 


AND НАУ (3) 
О AND SRI=1 THEN RESTORE 2570: НАМ (35) =1: 


OTO 1530 


1480 IF V$-"Yi" AND S$-"Oh" AND SRI-1 АМ 
D НАУ (2) =1 THEN RESTORE 2380: SRI-O: БОТО 
1520 


EN RESTORE 2390: SRI=1: GOTO 1520 

1500 IF V$-"MMa" AND S$-"GF" AND SRI-O А 
ND НАУ (2) =1 THEN 1650 

1510 IF V$-"MMa" AND S$-"GF" AND SRI-1 Т 


HEN RESTORE 2400:GOTO 1520 

1520 RESTORE 2410 

1530 GOSUE 1360: GOSUB 1100: GOTO 1420 
1540 

1550 GOSUR 1380:IF"kTAà-O THEN RESTORE 24 
20: GOSUE 1100 

1560 IF КТА=1 THEN RESTORE 
OO: GOTO 1600 

1570 IF V$-"RFC" AND S$-"UE*X" AND HAV(1) 
=1 AND TEU=O_ THEN TEU=1: RESTORE 2560: GOT 
O 1640 . 
1580 IF V$-"Gi" AND S$-"kG*o" AND TKU=1 
AND КТА=0 THEN RESTORE 2480:KTA=1: ТКО=0 : 
GOTO 1640 

1590 IF V$-"'Gi" 


2470: GOSUB 11 


AND НАУ(1)-О THEN RESTOR 


6 


E 2520: GOTO 1640 


1600 IF V$-"MMa" AND S$="[FnL" AND КТА=0 
THEN RESTORE 2530: TKU-O: GOTO 1640 

1610 IF V$-"MMa" AND S$-"L[FnL" AND КТАті 
THEN RESTORE 2540: TKU-O: GOTO 1660 

1620 IF V$-"Ti" AND S$-"kG*xo" AND КТА=1 

AND НАУ(2)-О THEN RESTORE 2550: HAV (2) =1: 

GOTO 1640 

1630 RESTORE 2410 

1640 GOSUB 1360: GOSUR 1100:GOTO 1570 
1650 ' 


1660 GOSUE 1380:RESTORE 2570: GOSUBR 1100 


1670 IF S$-"'Mn" THEN 1680 ELSE 1720 
1680 IF V$-"Ya" THEN RESTORE 2600:GOTO 1 
770 

1690 IF V$-"Ti" AND TKU-1 THEN RESTORE 2 


610:HAV(7) =1: TEUZO: GOTO 1770 


1700 IF v$-"Ti" AND HQV(6) =0 THEN RESTOR 
E 2620: GOTO. 1770 

1710 IF V$-"'i" THEN RESTORE 2630: GOTO 1 
770 

1720 IF V$-"MMa" THEN 1730 ELSE 1750 
1730 IF S$-"VL" THEN TKU-ZO:GOTO 1550 
1740 IF S$-"LFnL" THEN TKU-O:GOTO 1790 
1750 IF V$-"RFC" AND S$-"MBTC" AND HAV (ó 


)-1 THEN TEU=1: RESTORE 
1760 RESTORE 2410 

1770 БОБОВ 1360: GOSUB 1100:60Т0 1670 
1780 

1790 GOSUB 1380:RESTORE 2650: GO0SUBR 1100 


2640:60Т0 1770 


1800 IF V$-"'i" AND S$-"PS*Pn" THEN REST 
ОКЕ 2670:GO0TO 1850 

1810 IF V$-"MMa" AND S$-"VL" THEN 1660 
1820 IF V$-"MMa" AND S$-"LFnL" THEN 1860 
1830 IF V$-"MMa" AND S$-"GF" AND Окісі Т 
HEN 2110 

1840 RESTORE 2410 


1850 GUSUE 1360: GOSUR 1100: GOTO 1800 
1860 ' 

1870 GOSUR 1380:RESTORE 2690: GOSUR 1100 
1880 IF V$-"'i" AND S$-"FBFnm" THEN REST 
ORE 2710:GOTO 1930 


1890 IF V$-"Y^ni" AND S$-"FBRFnm" THEN RE 
STORE 2720: БОТО 1940 

1900 IF V$-"MMa" AND S$-"GF" THEN 2020 
1910 IF V$-"MMa" AND S$-"VL" THEN 1790 


1920 RESTORE 2410 

1950 GOSUR 1360: GOSUB 1100: GOTO 1880 
1940 *' 

1950 GOSUE 1580: КЕЅТОКЕ 2730:GOSUB 1100 
1960 IF V$-"TnIi" AND S$-"Jn'" THEN 1970 
ELSE 1990 

1970 IF GDR-O THEN RESTORE 2760: GDR=1: HA 
М (5) =1: 60ТО 2010 

1980 IF GDR-1 THEN RESTORE 2770: GDR=2: HA 
V(1)=1:GOTO 2010 
1990 IF V$z"Ehi" 
O 

2000 RESTORE 2410 
2010 GOSUE 1260: GOSUB 1100: GOTO 1960 
2020 ^ 


2030 GOSUR 1280:КЕ5ТОКЕ 2780: 60508 1100 


AND S$-"FBFnm" THEN 187 


2040 IF S$-"ELnOnCkm" OR S$-"LnOnC" OR S 
-"ELnOnC" THEN 2050 ELSE 2080 

2050 IF V$-"'i" THEN RESTORE 2790:GOTO 2 
100 

2060 IF V$-"ZUM" AND HQV(1)=1 AND нау (2) 


=1 AND HAV(3)=1 AND НАУ(7)-1 THEN RESTOR 
E 2800: UE1=1』 GOTO 2100 


2070 IF V$2"ZUM" THEN RESTORE 2820: GOTO 
2100 
2080 IF V$-"MMa" AND S$-"'LU'" THEN 1870 


2090 RESTORE 2410 

2100 GOSUB 1360: GOSUE 1100:GOTO 2040 
2110 ' 

,2120 GOSUB 1280: КЕЅТОКЕ 2830: GOSUB 1100 
2130 IF V$-"'i" AND S$-"MFmH" THEN RESTO 
"КЕ 2850: GOTO 2210 


2140 IF V$-"AlIni" THEN 2150 ELSE 2170 
2150 IF S$-"DK" AND NOV=1 AND ОК2-О THEN 
RESTORE 2860: OkK2=1: GOTO 2210 

2160 IF S$="DK" AND NOV-O AND ОК2=0 THEN 


RESTORE 2880: TAV=1: GOTO 2210 
2170 IF 8$-"'Mn" AND ТАУ-і AND UE2=O THE 
М RESTORE 2860: OK2=1: GOTO 2210 

2180 IF S$-'"'Mn" AND TAV-O AND ОК2=0 THE 
М RESTORE 2880: МОу=1 : БОТО 2210 

2190 IF V$-"MMa" AND S$-"VL" AND OK2-1 Т 
HEN GOTO 2220 

2200 RESTORE 2410 

2210 GOSUB 1360: 6050В 1100:GOTO 2120 
ا‎ ° 


2250 GOSUB 1280:КЕ5ТОКЕ 2890: 60508 1100 


2240 FLAY "o6cióri2cd64eó64f64g","0o7clór3 


2cd64e64f64q" , "OBc 1 6r さ 2Cd64e64f64 ロ " 
2250 ІМФ-ІМРІІТ6(1):ІҒ IN$< >CHR$ (13) 
RESTORE 2010:650Т0 2240 

2260 LOAD"ADV.GM.2",R 

2270 DATA 8 

2280 DATA 5,0,%% 1 га? / MN" UFR **,7,1 
Ü , 3 3€3* aw 

229о DATA 7.0 T9209 == гж 2" - звону уу" 
e AAAI АГАТА e DILI エリ ラー イル レデ オグ ガ タナ る ュ 
2500 DATA 7。 0 。 オ カ ア サ ソーー「 オ バド ント ウ モ モ ゅ テイ キナ サイ 。 」 


ド 22m ас; 
2310 DATA 1 』1 。 ホ "ファ ー ニ イッ テキ マーー ス 。 2 ,7,0,5* 2" 


) コギ キミ チラ Ж? スス ミ マ シグ 。 Й 
2320 DATA 2,0,2“ h» ナニ カカ " ソリ ニ ヒッ カカ リマ シタ 。 
つ さ る O_DATA_2 。7 。O 。 マ エニ リハ リ トナ カイ カ ^ ЕФ ITN レ テ イ マス 


THEN 


|. 2410 DATA 1,2,2,жжж ゴミ 


.2980 DATA.5,0,71-n ял“ эл“ 


24740ОЧ7ЛЕЛЕ-ЗЕУЕ S" UNDER PERS, 

2340 DATA 1,7,0,%497 カワ イイ NIZ ハリ イリ テイ ママ 。 

2350 DATA 1,7,0,44%7 フフ ロニ タワ サン バハ イッテ イマ ス 。 

2360 DATA 2,7,0,9"2w. ж 2"n ソリ ラ オリ テ 、 297 

ホウ ラミ ママ 。 ,4,0,Я7 р)“ ヒ ゅ カカ ゅ ティ イマ ズ 。 

2570 DATA 1,5,0, TF2N ホシ ノノ ヨウ ナ モ ノ カ "フッ リポ テイ マス 

2580 DATA 1,6,0,7")) YF? AVF" マシ ジョ ウ 。 

2590 DATA 1 。6。O 。 ホ " ウラ トラ ナイ ト スス ミ マ セン 。 

2400 DATA 1 。 ら 。 〇 O 。 ソ リラ hyh? U9" 2922; イッ テシマ ウノ テ 

は スカ 。 

TON ло Оо 2” 77077 

Uo жає 

2420 DATA 6 

2430 DATA 7 。O 。 サ ヒビ" ミハル ウナ FN 

1 PIRES けり ル イト コロ テ ^。 

2440 DATA 7,1," 2" у. 

2450 DATA 2,0,7?w. 

ла 

2460 DATA 2 

NI Уу» 

2470 DATA 1 
P. 


14% リエ テイ マヌ 。 。 1 。 


у д. шый 
кдр. р маш 


FIX" キマ ス 。 
i ier ж) Dey 
gE 902" 999 ANNITA RAs y bw 
sf 30。 サ リヒ” ミッ リウ ナ +7“ 1 ホ *" ン ハエ テイ マス 。 
2480 DATA 

2490 DATA 

774 JH 4 Қ. 


20,4У;97;) {©су "от SE T 


. 2500 DATA 2,14,42" メラ レル カラ タ * VOF" Res 


2510 DATA 
*900229, 
2520 DATA 
2530 DATA 
R! 

2540 DATA 1,7, 
2550 DATA 1,1, 
2560 DATA 1,6, 
2570 DATA 3 


7 」 0O 。 キ リン サン リ リ 、 2t*3 フラ フラ サ セ ナ カ " ラ 5 
1,5,0,727 キ 上 ルト" ウフ Л" EYOF" ax, 
1,4,0,2722. ミス テル TIIN イキ マセ ン ヨ ネ 。 


1 リリ リモ 29, 
さ 。 ナ カナ カニ シッカリ ミタ g-2*7"32a3, 
о, жж 742 3 ролт“ ох же 


b 


IN し テイマ ス 。。 5 。 0 。 


“Л” hFE キレ し レイテ"^ ス ヨ 。 


2590 DATA 5,0,Z2Z2" p" 「 サ ラサ ラ 」 ト 、 オト ヲタ テテ yp" 1, 
テ ュ キ マス 。 

2600 DATA 1,7,0,72"7. 2` フー リッ メタ フウ テ ニー オイ ミイ ナッ ー 
~o J 

2610 DATA 1,7,0, "ヨイ ショ ヨイ ショ ュ スイ トウ ニ ЕО 
Яш 4 NU, 


2620 DATA 1,2,0,T7-9» 4Lt/» Бозо“ スネ 。 
2630 DATA 1,6,0,%Э9%Э ヒ カ ゅ テイ マフ 。 

2640 DATA 1,6,0,жжж コイ トウ Э リカ ウノ テ " ス ポー x 
2650 DATA 2,7,0, EYNI AV FN タテ フタ "カカ "ゴチ マッ 


2660 DATA 4,0,%9/ жол ミチ テカ "リリ " イ テ イ ルル ノ テ "スカ" 


2670 DATA 2。7。O 。 タ テ フ タ "ニハ Че" ノ ヨ ウナ Е“ nn 
し テイ ママ 。 | 

2680 DATA 5,5,77и4 ZEY . 4/7», he 

2690 DATA 2,7,0,949* n4?" h^. ETZAtT- гж“ 
743236 

2700 DATA 7,0,-42"L». Wr" W"2"23 サ ソ ゅ ティ ルカ 


ノ ヨ ウ テ ” Re 
2710 DATA 
2720 DATA 


1,7,0, 7 ト テ モ セ マイ NAP" VF" 23. 
1,4,5" 27 ソリ ラオ リ 、 カイ クタ" シラ ヲ IR リマ ッ 


2/50 DATA さ 。 1.O。 コ " ミス テハ” | UD". 
у TEN PUT. 

2740 DATA 5S5,0, ナ ニカ ヤヤ ワ ニタ ツリ モノ カカ "アル カモ シ し ナイ ィ イト 
2750 DATA буЛ 2" NC チク ニニ Ras 

2760 DATA 1,6,O0O,24/F99p". テ " テ キマ シク 。 292795: 
47”. DINIY?" 35 

2770 DATA 1,6,0,7T4770' 7°“ テキ マシ ダグ 。 
シッ カリ シテ ィ イフ マス 。 

2780 DATA 1,3,0, I2. 

94. 

2790 DATA 
" O2 T^ s 

2800 DATA 2,7,0,77Л7Л ケイ カン ヲ .,"552"tf., 3 

5) US" ЯЛЛЫ 


ny 77 


м. 23" 


3347.2. 9957 nmt. Ят 


1 。 プ 。O 。 ナ ニカ シラ 25" f テカ ララ モッ クー オミ パソ 


2810 DATA 7,0, R7" オマ エ ノ モ ゅ テイ ル Ж эл, 99 / 
Ж“ ウ テ * リナ イ 。。 の 。 ト "ウフ トリ トーリ ナジ カテ" キル ヨウ ニー ナル ツ ド 
e ココ ロ シ テ リカ エ 。 」 

2820 DATA 1,7,0,^22"29" ヤル コト カ " アル ソ * 。 ケイ ケン 
9 AU" Pel 

2830 DATA 3,7,0,tU/ fn*"2.,7,1,7UL. スカ ンク 


7” ヨリ リキ ゅ クタ ヨウ ステ ^ オレ テイ マズ 。 
2840 DATA 4,0,5^"2") スカ フワ . ノ ホウ ハー アユミ ヨリ 、 0... 


2850 DATA 2,2,0,Л99"/ФІСІІ ウ ゅ ズラ ト 1*7" "tw 
テイ マス 。 。 2 。 1 。 ト " ウシ タラ ヨイ ノ テ "ジョウ カ 。 
2860 DATA 2,5,0,272 ""jw*-2TU3528. ソ シ テ 、 


2870 DATA 5,0, サ ニキ ュー h 4w* сулу 27" テ ュ キ マシ ダグ 。 
2880 DATA 1,2,0, ス コシ ハー J“ シキ ニナ リマ シク タカ "ーー マゲ" 93 
"2*n3» アリ ッ セ -/。 


2890: DATA 13,9,0,4" 2" V. スカ クソ ア トラ アウ チチ リ イ テ 


AT. 

2900 DATA. 5,1,V/9» 9“ л“ у YVI ワ ス レ テシマ イ ・・・ ; 
,5,1,Tt"9 へ "シト ウト エサ umu" EU) シッ カリ モッ ティ イマ ス 。 
2910 DATA 7,0,5"2"2-h メス カッ クニ 344 994*"-—WM 
2920 DATA 7,1,7% "mnm nua, 

2930 DATA TILT 295-4249" ミニド リキ の カウル) うり 
2940 DATA 7。1 。Ez グ ウミ バ ュ フン ヒ "ラス ルコ トニ シマ ショ ウ 。 

2950 DATA 5,0,777/ ウエ ニア ル N° ソコ シン ノ リタ ー-/ キ ー 3 
2960 DATO 5S,1,'4&*2ih コト ミコ ョ リ RST 2:02 2595 
2970 DATA $5,2,(23Ut Eyb ЛР? ハシ レル ヨウ ニ ナリ マヌ 


а 

2980 DATA 1,2,У9% RT 7"2uM マカ フフ ニニ オイ ウフ コト カ * 
3" FF" jan. 

2990 DATA 6,0,7Я4 22325") オリ ナシ アイ コト л 
5000 DATA 14。O。「 オ キミ パウ サー アリ カ " ト ウ 」 Fa Dw 
カリ JA" エ テ オ イ テ ヨ 。 

5010 DATA 1,9,0,/9-:%- 3 Rvs h 


32%" が ーー 


HORS 
104 99% 


| Kt, CIRCLE 命 今 . 


(ぼく は マシ ン 語 を 全然 知り ませ ん . だ か ら (? ) い わせ て も らい ます . まず 誰か PC-6001 の RENUM 命 令 を 作っ て くだ さい . 
は アト リ ビ ュ ー ト 操作 を する と 8 色 使 える と 聞い た の で , BASIC で 8 人 色 使 を る よう に , 
も ちろ ん 中 は 塗り つぶ せる よう に . 
ム が 作れ ます .。 マシ ン 語 を 知ら な い 人 間 か ら の お 願い で し た . 


最後 に GET@、 PUT@, 


それ か : 56001 
まだ それ に と も な っ て の 中 間 人 色 命 含 を 作っ て くだ さい . 
БСВ. これ る きえ ぇ あれ ば BASIC で 謝 員 いい ゲー 

: (GEN) 


1000 
1010 CLEAR 500: рІМ SMM$ (25 


) MME: (20) ,LMO 
$(40) ,HAV(20) ,555%(15) ,VVV$ (15) 
1020 PLAY"oSac32d32e32f32g3206c32r805922 
rióoóc" 
1030 FOR I-O TO 200 STEF Z:LINE(O,I)-(64 
O,I),AND,O:NEXT:FOR I-196 TO 1 STEF -Z:L 
INE (0,1) – (640,1) ,AND,O: NEXT:FOR I-2 TO 1 
99 STEF 3:LINE(O,I)-(640,I) ,AND,O: NEXT 
1040 FOR C=1 TO 7:COLOR- (C,C) : NEXT: WIDTH 
80,25:CONSOLE 4,18,0,0 
1050 LINE (0,0) ~ (640,52) ,PSET,1,BF 
1060 FOR РЕ=0 ТО 2: SYMEOL (РЕ+25,5) , "РЕ К 
EY SET "РЕЗ ЕЖ xiL' 'PF2 29 алыл” 2,4; 
4: SYMBOL (FPF*200,21),"'PFZ ミナ ミ 2245' 'РЕ4 
$9 225'",2,1,4: NEXT 
1070 FOR РЕ=0 TO 22 STEF 2:LINE(O,FF)-(6 
40,FF),XOR,1:NEXT 
1080 GOTO 1410 
1090 
1100 READ KAI:FOR ККК=1 TO KAIs:PLAY"o7có 
4r 32c64" 
1110 READ COL,MLG,LMJ$ 
1120 LMJ=LEN (LMJ ま ) 』FUR Ісі TO LMJ:LMO$ 
(І)-МІр%(1М0%,1,1):МЕХТ 
1120 FOR Ісі TO LMJ:FOR 2-0 TO 2:5ҮМВО 
L (16*MLG*16*I*J,168) ,LMO% (1) ,2,1,COL 
1140 NEXT:NEXT 
1150 LOCATE O,21:PRINT:PRINT:NEXT 
1160 IF COL^7 THEN RETURN 
ыо. 
1180 PLAY"o6có4d64e54f 5298" : SMM 和 = リコ ウイ ウト キ 
К“ ウマ ヌル モ ノ カ ナー: SsGM=LEN (SMM$ ) 
1190 FOR SS-1 TO SM: SMM$ (55) -МІр%(5ММ%,5 
6,1):МЕХТ 
1200 FOR SS-1 TO SM:FOR Ј=0 TO 2』SYMEOL ( 
16*88*J,176) ,SMM$ (SS) ,2,1,7: NEXT: NEXT 
1210 MK$-INFUT$(1):PLAY"oócó4" 
1220 IF МК%>-СНК%(%НА1) AND MK$«-CHR$(&H 
DF) OR Mk$-" " THEN 1220 ELSE IF ME:=CHR 
$(8) THEN 1250 ELSE IF МКФ=СНКФ (15) THEN 
1260 ELSE 1210 
220 IF KU-15 THEN 1210 ELSE KU-KU-1:MMK 
$ (EU) =МКФ 
1240 FOR I-O TO 2:8YMBOL (16*KU-*I14220,176 
) ,MMKES$(GU),2,1,4: NEXT: GOTO 1210 
250 IF KU-O THEN 1210 ELSE LINE(16* に U+ さ 
20,176) - (16*KU*226,184) , AND, O, BF: KU-KU-1 
:GOTO 1210 
1260 FOR I-1 TO KU:SV$-zSV$-«MMK$ (1) :NEXT: 
PLAY"oSfióriófióriófió" 
1270 SPS-INSTR(1,SV$," 
EN 1280 ELSE 1290 
1280 FOR L-176 TO 200 STEP 2:LINE(O,L)-( 
640,L) ,PSET,O:NEXT:FOR し =177 TO 200 5ТЕР 
2:LINE (0,L) - (640,1) ,PSET,O: NEXT: SV$z"": 
KU-O:GOTO 1180 
1290 ӘРІ -( ЕМ(5У%):5%-МІП%(5У%,1,5Р5):У%- 
MID$(SV$,SFS*2,SFL) 
1300 IF S$-"" OR S$-" " THEN 1240 
1310 555=1 ЕМ№ (5%) :ҒОК 0=1 TO SSS:988$(0)- 
CHR$ (ASC (MID$(S$,0,1)0) -&4H70) :55%=55%+55 
$ (0) МЕХТ:5%-55%:55%-"" m 
1:20 IF V$-"" OR INSTR(1,V$," ")ZLEN(V$) 
AND INSTR(1,V$," ") >0 THEN 1540 
1330 VVV-LEN(V$):FOR O21 TO VVVsVVV$ (0) = 
CHR$ (ASC (MID$ (V$,0,120) -&$H70) : VV$2UV$ -VVV 
Ф (0) :NEXT: V$zVV$: VV$-"": GOSUB 13560: RETUR 
N 
1340 S$-2"":888$-2"":U$-"":UVyU$-"":kU-O:GO 
SUB 1360: GOTO 1180 
1550 
1360 FOR L-176 TO 184 STEF 2:LINE(O,L)-( 
640,L) ,FSET,O:NEXT:FOR し =177 TO 184 STEP 
2:LINE(O,L)—(640,L) ,FSET,O: NEXT: SV$z"": 
"О-О: RETURN | 
SIO 
1380 FOR L=175 TO 32 STEP -Z3:LINE(O,L)-( 
640,L) ,AND,O:NEXT:FOR L-174 TO 32 STEP - 
S:LINE(O0,L)—(640,L) ,AND,O: NEXT: FOR し =17 さ 
TO 32 STEF -Z:LINE(O,L)—-(640,L) ,AND,O:N 
EXT 
1390 RETURN 
1400 ' 
1410 RESTORE 2930: GO0SUR 1100 
1420 IF S$-"ELnOnCkm" AND V$-"AhFnTC" TH 
ЕМ 14520 ELSE 1410 
1430 RESTORE 2950: GOSUE 1100 
1440 IF S$-"MFmH" THEN 1450 ELSE 1420 
1450 GOSUB 1280: КЕЅТОКЕ 2960:GOSUB 1100 
1460 IN$-INPUT$(1):1F INS$«2CHR$(12) THEN 
1460 
1470 
1480 GOSUE 1580: КЕЅТОКЕ 5050: 6OSUE 1100 
1490 IF S$-"Jd" OR S$-"^nKJnd" THEN 1500 
ELSE 1520 
1500 IF V$-"'i" THEN RESTORE 3090: GOTO 1 
560 
1510 IF いま ="ZE1i" THEN RESTORE 5110: БОТО 
1560 


"iiF SESw-L ТЫ 


1520 IF S$-"Tnà" OR S$-"BhHnO" OR S$-"TL 
ng" THEN RESTORE 2120:G0TO 1560 

1550 IF V$-"MMa" AND S$-"VL" THEN 1710 
1540 IF V$-"MMa" AND S$-"'U'" THEN 1580 


1550 RESTORE 3080 
1560 GOSUE 1360: GOSUE 1100: GOTO 1490 
1570 ^ Ў 


リス ト 3 ADV.GM2 BASIC リ スト 


1580 GOSUR 1380: RESTORE 3130: Б050Е 1100 
1590 IF S$="AU" THEN 1600 ELSE 1640 

1600 IF V$-z"'i" AND АМА-О THEN RESTORE 2 
150: GOTO 1690 

1610 IF V$-"'i" AND ANA=1 AND HAV (15) =O 
AND NIN-O THEN RESTORE 2160: ТОТ=1: БОТО 1 
690 

1620 IF V$-"ZRi" AND ама-О THEN RESTORE 
2180: ANA=1: GOTO 1690 

1630 IF V$-"Sni" AND ANA-1 THEN АМА=0: GO 
TO 1480 

1640 IF V$z-"^i" AND S$-"RO" AND TUT=1 АМ 
D THO-O AND NIN-O THEN RESTORE 3190: THO- 
1:GOTO 1690 

1650 IF V$-"Ti" AND S$-"VmLnm" AND THO-1 
AND НАУ(15)-о AND NIN-O THEN RESTORE 32 

OO: НАУ (15) =1: NIN-1:GOTO 1690 

1660 IF V$-"Fjni" AND S$-"VmLnm" AND HAV 
(15)-і AND NIN=1 THEN RESTORE 3220: HAV (1 
5) =0: GOTO 1590 

1670 IF V$-"MMa" AND 5%= "БР" 
1680 RESTORE 5080 

1690 GOUSUE 1360:GOSUR 1100:GOTO 1590 
1700” 

1710 IF MMZ-O THEN GOSUB 1580:КЕ5ТОКЕ 22 
40: GOSUE 1100 

1720 IF MMZ=1 THEN GOSUB 1380:RESTORE 32 

20: GOSUE 1100 
1730 IF S$-z"HBTn" 
1740 IF V$z"'i" 

820 

1750 IF V$-"Ehi" OR V$-"ZRhi" 

ESTORE 3260:GOTO 1820 

1760 IF V$-"'i" AND S$-"KFU" AND ММ2=0 T 
HEN RESTORE 5270: GOTO 1820 

1770 IF V$-"ZUM" AND S$-"KFU" AND MMZ=O 
THEN RESTORE 2290: БОТО 1820 

1780 IF V$-"ETM" OR V$-"AlIni" THEN IF 5% 
z"''Mn" AND HQV(1 ネ )=1 AND MMZ=O THEN RES 
TORE 5500: ММ2= 1: НАУ (112) =0: БОТО 1820 

1790 IF V$-"MMa" AND S$-"GF" THEN 2010 
1800 IF V$-"MMa" AND S$-"'U'" THEN 1840 
1810 RESTORE 5080 

1820 GOSUR 1560: GUSUB 1100:GOTO 1730 
1830 ' 

1840 IF OkKZ-z1 THEN RESTORE 2510: 6050Е 11 
00: БОТО 1710 

1850 GUSUE 1580: КЕЅТОКЕ 3320: GOSUE 1100 
1860 IF У%="`і" THEN 1870 ELSE 1920 


THEN 1470 


THEN 1740 ELSE 1760 
THEN RESTORE 2250: GOTO 1 


THEN ВЕЕР: К 


1870 IF S$-"Ud" THEN RESTORE 3340: GOTO 1 
990 
1880 IF S$-"PU" AND TKU-O THEN RESTORE 2 


3S0: GOTO 1990 
1890 IF S*$="FU" AND TKU-1 AND HAV (14) =0 
THEN RESTORE 3410: ТКО=0: HAV (14) =1: GOTO 1 


990 

1900 IF S$-"BM" THEN RESTORE 3360: GOTO 1 

990 

1910 IF S$z-"Jnkn" THEN RESTORE 3370: БОТО 
1990 


1920 IF V$-"TnIi" AND S$-"Jnkn" AND GZA= 
О THEN RESTORE 5280: 6ZA=1: GOTO 1990 

1930 IF V$-"RFC" AND 5%-"ВМ" AND TEU=O Т 
HEN RESTORE 2400: TKU-1:GOTO 1990 

1940 IF V$-"Ti" AND S$-"''Mn" AND НАУ (13 
=0 AND GZA-1 THEN RESTORE 2420: НАУ (15) = 
1:GOTO 1990 


1950 IF УФ-"бпі" AND S$-"Ud" THEN 1960 E 
LSE 1980 
1960 IF HAV(13)-1 AND НАУ (14) =1 THEN Ok3 


-1 

1970 TEU=0: GOTO 1710 

1980 RESTORE 3080 

1990 GOSUB 1260:6050Б 1100: GOTO 1860 
2000 ' 

2010 GOUSUE 1580: КЕЅТОКЕ 3430: GOSUR 1100 
2020 IF V$-"Y^ni" AND S$-"G" AND EUN=O А 
ND KIV-O THEN RESTORE 3440: GOTO 2090 
2030 IF V$-"Y^ni" AND S$-"G" AND KUN-1 А 
ND KIV-O THEN RESTORE 25450: КІУ=1: БОТО 20 
9o 

2040 IF V$-"WHn" AND S$-"HR" AND KUN-O А 
ND KIV-O THEN RESTORE 3460: EUN=1: БОТО 20 
90 

2050 IF V$-"ZH" AND S$="HR" AND KUN-1 АМ 
D KIV-1 THEN RESTORE 3470:kUN-O:GOTO 209 
O 

2060 IF V$-"Ehi" AND S$-"G" OR S$-"DFn" 
THEN IF KUN-O AND KIV-1 THEN 2110 

2070 IF V$-"MMa" AND S$-"'U'" THEN 1710 
2080 RESTORE i080 

2090 60508 1360: GOSUB 1100:GOTO 2020 
i100 ^ 

2110 60508 1580: КЕЅТОКЕ 2480: GOSUB 1100 
2120 IF V$="ZBi" AND 5%= "АЦ" THEN ОК4=1: 
БОТО 2160 

2150 RESTORE 5080 

2140 BUSUE 1560: 6050В 1100:GOTO 2120 


2160 IF М15-О THEN GOSUR 1580:КЕ5ТОКЕ 34 

90: GOSUB 1100:W15-1:GOTO 2180 

2170 IF 15=1 THEN GOSUE 1580:КЕ5ТОКЕ 35 

3O: GOSUR 1100 

2180 IF V$-"CJnFM" AND S$-"eF" AND КЕА=1 
THEN RESTORE 3540: YAG=1: GOTO 2230 

2190 IF V$-"Ehi" AND S$-"ZLJn" AND YAG=1 
THEN 2490 


2200 IF V$-"MMa" AND S$-"[FnL" 
2210 IF V$-"MMa" AND S$-"GF" 
2220 RESTORE 5520 

2250 GOSUB 1360:GOSUB 1100:GOTO 2180 
2240 ' 

2250 GOSUR 1280:КЕ5ТОКЕ 3550:GOSUB 1100 
2260 IF V$-"ETM" AND S$-"DK" AND Wi7-1 А 
ND КЕА=© AND GUN-1 THEN RESTORE 5560: КЕА 
=1: GOTO 2300 

2270 IF V$="MMa" AND S$-"GF" 
2280 IF V$-"MMa" AND S$-"VL" 
2290 RESTORE 3080 

2:300 GOSUE 1360:GOSUB 1100: GOTO 2260 
ЖАУДА” 

2320 IF KEA-O THEN 6050Е 1380:RESTORE 35 
90: GOSUB 1100: GOTO 2240 

2550 IF КЕА=1 THEN GOSUB 1380:RESTORE 36 
OO: GOSUB 1100 

2240 IF V$-"'i" AND S$="Th" AND KEA-O AN 
D GUN-O THEN RESTORE 2610:60Т0 2410 

2550 IF У%-"Ті" AND 5Ф-"Һ>СілпеС" OR бө" 
S?^oC" OR S$-"Ln-C" THEN 2260 ELSE 2380 
2360 IF КЕА=О AND GUN-O THEN RESTORE 322 
O:W17-z1: GUN=1: GOTO 2410 

2570 IF GUN-1 THEN RESTORE 3650: GUN=1: GO 
TO 2410 

2580 IF V$-"MMa" AND S$-"'U'" 
2590 IF V$-"MMa" AND S$-"VL" 
2400 RESTORE 5080 i 
2410 GOSUR 1360: Б050В 1100:GOTO 2240 
2420 ‘ 

2420 GUSUE 1280: RESTORE 3660: БОБОВ 1100 
2440 IF V$z"'i" AND S$-z"AU" THEN RESTORE 
5670:60Т0 2480 
2450 IF У%-"ММа" 
2460 IF V$z"MMa" 
2470 RESTORE 3080 

2480 GOSUR 1360: GOSUB 1100: GOTO 2440 

2490 ” 

2500 IF Wi9=0 THEN GOSUE 1580: RESTORE 56 

80: GOSUB 1100:U19-1:GOTO 2520 

2510 IF W19-1 THEN GOSUR 1380:RESTORE 357 

20:60508 1100 

2520 IF УФ="`і" AND S$-"TnCHR" 

ORE 3740:GOTO 2570 

2550 IF V$-"'i" AND S$-"AU" 
THEN RESTORE 2720: БОТО 2570 

2540 IF УФ="ММа" AND S$-"[FnL" 

ORE 5770: 60Т0 2590 

2550 IF V$-"MMa" AND S$=" GF" 

E 3770: GOTO 2730 

2560 RESTORE 3080 

2570 GOSUB 1360:GOSUBR 1100: GOTO 2520 

2580 

2590 IF NIA=1 OR SIF-1 THEN GOSUE 1380:R 

ESTORE 3780:GOSUB 1100:GOTO 2620 

2600 IF kKDT-O THEN GOSUR 1380:RESTORE 27 

90: GOSUB 1100:GOTO 2620 

2610 IF KDT-1 THEN GOSUE 1280: КЕ5ТОКЕ 38 
10: GOSUB 1100 

2620 IF V$z"'i" THEN 2650 ELSE 2670 

2630 IF S$-"AU" OR S$z"fJAU" THEN IF KDT 

=Ó THEN RESTORE 3840: БОТО 2710 

2640 IF S$-"AU" OR S$-"fJAU" THEN IF KDT 

ті AND NIN-zO THEN RESTORE 3890: БОТО 2710 

2650 IF S$-"CkGn" AND NIA-O THEN RESTORE 
3850:GOTO 2710 

2660 IF S$-"L^?^o" AND NIA=1 THEN RESTORE 
S890: SIF=1: GOTO 2710 

2670 IF V$-"AIni" AND S$-"VmLnm" AND HAV 
(15) =1 AND EDT=1 AND NIA-O THEN RESTORE 
Z860:NIA-1:GOTO 2710 

2680 IF V$-"Ti" AND S$z-z"SFn'" AND SIF-1 

AND Нау (10) =0 THEN RESTORE 3900: HQV(10) = 
1:0K521:GO0SUB 1100: GOTO 2850 
2690 IF V$-"MMa" AND S$-"VL" 
2700 RESTORE 3080 

2710 GOSUBR 1260: GOSUR 1100:GOTO 2620 
2720 ' 

2730 IF _ EDT=O THEN GOSUR 1380: RESTORE 
20: GOSUB 1100:GOTO 2750 

2740 IF EDT=1 THEN GOSUB 1:380: RESTORE 
So:GOSUB 1100 

2750 IF M$-z"'i" AND S$-"JTnc" OR V$=" `i" 
AND S$-"Ln'G" THEN IF VEA-O THEN RESTOR 
E 3960:GOTO 2810 

2760 IF V$-"AlIni" AND S$-"JjnmTC" AND VEA 
=0 THEN RESTORE 5970: VEA-1:KDT-1:GOTO281 
O 

2770 IF V$="ZUM" AND 5%="ЈТПС" THEN IF V 
EA=1 THEN RESTORE 4010: БОТО 2810 

2780 IF V$-z"ZUM" AND S$z"Ln'G" THEN IF V 
EA-1 THEN RESTORE 4010:GOTO 2810 

2790 IF УФ-"ММа" AND S$-z"'U'" THEN 2500 
2800 RESTORE 3080 

2810 GOSUR 1360: GOSUR 1100:GOTO 2750 


2820 


THEN 2250 
THEN 2430 


THEN 2320 
THEN 2160 


THEN 2250 
THEN 2430 


AND $$-"'U'" THEN 2160 
AND S$-"LFnL" THEN 2320 


THEN REST 
OR S$-"fJAU" 
THEN REST 


THEN RESTOR 


THEN 2490 


2830 BUSUE 1380: RESTORE 4020: GOSUB 1100 
2840 FOR I-O TO 8000:NEXT 

2850 IF MMZ-O AND HAV (14) =0 THEN RESTORE 
4100:GOTO 2890 


2860 IF HQV(14)=O THEN RESTORE 4090; БОТО 
2890 

2870 IF MMZ-O THEN RESTORE 4080: GOTO 289 
о 

2880 RESTORE 4110 

2890 GOSUB 1380: GOSUB 1100 


105 


БЮ 


ІЛ ДКЗ ADV. GM2 BASIC! Z F 


2900 RESTORE 4120: GOSUR 1100 

2910 PLAY "oéóciórZ2cd64e64f64g","o07cl6ór3 

2cd64e64f64q","o8ciórZ2cdó64e64fó64g" 
2920 ІМФ=ІМРОТФ (1) : ІР 1М№Ф< >СНКФ (15) 
2910 ELSE LOAD "Ару. GM. 5" К 

2950 DATA 4,5,0, ## 2 уа? / ハシ "マリ テス **,7 
9 10 з жжж 

2940 DATA 7,0,4> ホラ モウ ZIT472.,7,0,742hn 
yt: Р" ХУЛЬ 

2950 DATA 1,7,0,942"- クス ケタ 
9299 F イレ テ ネ 。 °. 
2960 DATA 10,7,О,Ж“ 7N Руһ マカ フフ ラー リカ マエ ルコ ト 
D“ F” Ф707. 

2970 DATA 3,0 FIO“, occ, O.L 。 ス コシ リナ レタ トコ ロニ 

ト テ モチ イサ ナ MM" OI" PN" ワッ テイ ママ 。 

2980 DATA ら 5。 1 。 コ ウキ シン オウ セイ ナ ж フフ ウフ ニ ト w ト ハ 、 Е 
ә 2»252/2hn. 

2990 DATA 5。 1 。 ア ラマ ノ ナ カ ニハ アリ マセ ラ 。 
22%“ 

3000 DATA 5。 1 。 ジ シッカリ ト -t'"5LT49 F7 ナカ カラ -"7" 
FAI セイコ ウ 。 

3010 DATA 5,1,t/22"4 イキ オイ テ " ハシ リサ リマ シタ 。 
3020 DATA 4,0, シ カシ イマ ノ R TIN ソフ ナコ トリ h"?-T 
"SE е Re 

SO30 DATA 4,1,8"2" ムイ シキ ノウ テニ ソノ ホホ "ロコ" ヤノ 
マエ ニタ ワッ ティ マシ グ 。 

5040 DATA 9,0,U9-»5 キー 3 
Xe サキ ニ スス ミ マ ス 。 

5050 DATA る 。7 。O 。 メ ノ マ エ ニ ROI" Ph PUTA. 
5060 DATA 6,1,29%:) オウ セイ ナー Ж“ フト シテ ハト" ウ ヤ ゅ 
2277. . 

3070 DATA 6。』 1 。 コ ヤノ ナカ ニ ハイ リタ イ テ " マネ 。 

5ОВО DATA 1,2,5,5** イミ 2» 239F"7 979 "U 

; жж 

5090 DATA 4,7,0, 17° ўл. 

n? ハイ ッ テ ヨイ ノ カ ワカ カラス" 、 

3100 DATA 2,1,47), AIT WT AVR A 。2 。 ア マリ 
カッ カッ ZWh s.. Л“. コワ レフ マス ヌ 。 

5110 DATA 1,5,0,17 リ 7" FN. ト " コ ニア ル ノ テ "ショ ウ カ 。 

5120 DATA 1 。2。O。 ソ ノ ヨ ウナ モノ ハ 、 コノ жастау "4 

ティ マセ ー。 Mo 

5150 DATA 2,2,0,Ж7/ メ ノ マ エニ ハ 、 
アリ マス ズ 。 

3140 DATA 3,1,77/ ヨコ ノ ヒョウ サリ ニ バ 、 

274722 

5150 рата 


ТНЕМ 


ше РА Pike 


202997 4 


RINK 497329" サイ 


ワカ リマ セ 


ミア タリ マセ ヤン 。。 7 。 1 。 ト " コ 


эЛ PTT. 
POSEE UNS 


1 ,7,0 ヒョウ サリ ニハ 、 「 ウ サキ チュ ト 、 
5160 DATA 2,4,0,%»/ AON". 
5170 DATA 4 。1 。 ス コシ マエ ニ 、 
235045" スネ 。 

3180 DATA 1,5,1,77/ TNF X, 
rra. M 

3190 DATA 1,7,0,7»55 с" zm. 
9" эе“ ラ レ ソ ウ テ * 223, 

3200 рата 2,5,0,799- オイ シソ ウ 。 


АРУ 
UMP "ts 


1757 42. 
233 


uv" サン 


29" 7°ў 


+9. зһ. 

3210 DATA 3,1,99*"9.75. V^4DÓ7"naox. 09° 
サン ナラ 。 

5220 DATA 1,2,0, RV. ホリ 。」 VAN. ダリ マセ ー ネ 
5250 DATA 1,7,0,Ж"2/ メ ノ マ エニ ハ 9742" フル フナ ポッ 
9 ART PIT 

5240 DATA 2,7,0,^4"2"/ 2721-2 947 7377 
"9 4h^m 7UY2. 

3250 DATA 7。 1 。 ナ カニ ハ 、 AIN? h". オヨ イ テ " イマ スズ 。 


さ 260 DATA 
3270 DATA 2 
3280 DATA 7 
ҒА we а 

3290 DATA 1,6,0,"-»““...-.-. 
m Ux. 

3300 DATA 1 。6。O。「 ア リカ "トウ 。 ュ ト 、 


1,2,0,72" ナイ 。 ソウ イ ウ コト リー シテ ハ イケ マセ ン 


,7,0,2272 3097472. 
,1,720» ア ケ " ナ イト 22799" Y vj" シマ イ 


Jet ЧАТЕ 


イッテ ト " コカ へ イッ 


1000 

1010 CLEAR 5S00:DIM SMM$ (25) ,MMK$ (20) ,LMO 
$(40) ,НАУ(20) ,8S88$ (15) ,VVV$ (15) 

1020 PLAY"oSac32d32e22f329g3206c32r805932 
ri6o6c" 

1050 FOR I=0 TO 200 STEP 3:11МЕ(0,1)-(64 
O,I),AND,Q:NEXT:FOR 1=196 TO 1 STEP -3:L 
ІМЕ (0,1) – (640,1) ,AND,O:NEXT:FOR 1=2 TO 1 
99 STEF 3:LINE(O,I)—-(640,1) ,AND,O: NEXT 
1040 FOR C=1 TO 7:COLOR- (C,C) : NEXT: WIDTH 
80,25: CONSOLE 4,18,0,0 

1050 LINE(0,0)-(640,32) ,PSET,1,BF 

1060 FOR PF=O TO 2: SYMBOL (PF*25,5) , "РЕ К 
EY SET “PF1 ЕЛУ aa5' 'PF2 су 225'",2,.1, 
4: SYMBOL (PF*200,21),"'PF3 575 2247 “РҒ4 
499 225'",2, 1,84: NEXT 

1070 FOR PF=O TO 52 STEP 2s:LINE(O,PF)-(6 


40,PF) „ХОК, 1: NEXT 

1080 GOTO 1410 

1090 

1100 READ KAI:FOR ККК=1 TO KAI:PLAY"Oo7có 
4r32c64" 


1110 READ COL,MLG,LMJ$ 

1120 — LMJELEN(LMJ$):FOR Ізі TO LMJ:LMO$ 
(1) =MID ま (LMJ* 。 1,1) : NEXT 

1130 FOR Ізі TO LMJ:FOR J=O TO 2: ЅҮМВО 

L(16*MLG+16* エ ォ ゴ 。 168) „МОФ (I) ,2,1,COL 

1140 МЕХТ:МЕХТ 

1150 LOCATE 0,21:PRINT:PRINT:NEXT 

1150 IF COL?7 THEN RETURN 

1170 ' 

1180 PLAY"o6c64d64e64f 3298" : BMM も = リコ ウイ ウト キ 
b ウス ル も ノ カ ナ >>>": SM=LEN ( SMM を) 


ティ マイ フシ ジグ 。 

5510 DATA 1,15,1,Ғ9 ナヤ へ МЕТУ 22% アリ マ 
Ue 

5520 DATA 5,5,0,7177` アリ マス ヨ 。 ,5,0,27922 コウ イ ウ 
トコ ロニ リハ ナニ カ ア ル モノ 9" K 4"2"n カン ガ が Ix 

3330 DATA SONT y TP 2 TIZ эм ees 
5540 DATA 2,7,0,970" アリ マス 。 シタ ニハ 本 "ロナ T9 
"mH" イチ マイ 。 。 7 。 1 。 ソ シテ スミ ニ AAN イッ キャ アリ マス 。 
5350 DATA 1,6,0,77*2a^5n»". 6777 37 ミエ マセ フ 。 
5560 DATA 1,5,0,7777 シッ カリ ト FAT 
3370 DATA 1 。4。0。 ホ ロホ" ロ r"z. ЛЫ. 
ス 。 りり カ エゾ ソウ モア リマ セン > 

3380 DATA 2,7,0,952»5 ZIT YIM 
$490 DATA 731,354 TAM. Two. 
Jb. 447X27. 

3400 DATA 1,6,2,ж%ж% イス ラー リカ ウノ テー マネ 。 жж 
5410 DATA 2,7,0,7%- ダナ ノウ エニ 、 TFN" オイ テア リフ マ 
2,272,034 7 n УУ2 92797 А Жоо? Жүзге SUS 
ミ マ ミダ 。 

3420 DATA 1,1,0,Z252"» RTD  / モ ノニ ナッ テッ リマ イマ シグ 


№717 


y" テキ マシ タ 。 
「 ト ラナ イ テ * ェ ー 


2.7.0.97" 15**o 297492594.,7,0,V7 
#" 3" ヤノ ホウ ニー ムカッ ゅ テイル ノ カ "ミエ マス 。 
3440 DATA 1,5,0,72» スハ "ウッ テー 922 IR" レフ セ エ e 
ホラ ゅ 29 3*7. 
3450 DATA 2,5,0,7272 JR” LIND” 7° +72075, 5,1 
17”, AT йу, ЖОЛ" ヤノ ヤ ネ ノ ウエ テ ^ 2. 
5460 DATA 1,5,0, зо ILF“ *- ノボ お "リヤ スク ナッ ダ 。」 
5470 DATA 1,7,0, ALF" s"u». サラ ァ ー ホホ ロゴ PZ N 
АҒ 
3480 DATA 2,4,0,Ж47). 
O, Po. PIN" アイ ティ ママ 。 
5490 DATA 3,7,0,tT»"h ホホ "ロコ "ヤノ ナカ ニー ハイ ルコ トカ " 
y" キマ シク 。 
3500 DATA 7,0, シ カシ 、 
ココ カラ ハ 、 
3510 DATA 7,0,7"W2h^» F" FU. 
5520 DATA 1,2,0,%1° 707 アリ マセ ン ヨ 。 
3530 DATA 1,7,0,8" 2") ヤニ アイ アナ ノ シタ ニ イ マ ス 。 
5540 DATA 1,7,0,79 RFN ヒッ クリ 。 シタ カラ ハシ 
т TNT F J93t 7 
5550 DATA 2,7,0,1Л2/ 
7,0,10t7*7" 54*" 2%. 
5560 DATA 3,4,0, ア ナノ ナカ カラ コト リタ テカ" 、 
v“ グー ッテキ テ イイ マシ ジグ 。 
3570 DATA 4,1, 749°, ナン セイ ノ ワリ アテ ノ ト コロ / 179 
92° カシ テ ミ タ ラ 。 」 
さ 580 DATA 4,1,h. 
24725, 
3590.DATA 2,7,0,U290»"39-»h'. スミ ニ オイ テア リマ ス ヨ 。 
оо ОРТА コト サン カリ" КЕ" TOTALS 
5600 DATA 1,7,0,Ua9?5»5"17?)". スミ ニ オイ テア リマ ス ヨ 。 


ヤ ネ ノ ウエ ニ グッ テイ マス 。 Z, 


Тл) アナ カラ ハイ ッテキ クタ ノ テ " 、 モウ 


95197 PIN ?7474Ч2а», 


у“ JFI 


コト リサ フリ ハー PS アナ カラ テ ”" 7492 Y 


-3610 DATA 1,5,0, コ トリ サハ 7F" F2 МЕ” 27974724» 


5620 DATA 3,2,0, 3P Tun. 
ワリ アテ . ノ トコ ロニ アル 、 

5650 DATA 2。0。10 セ ン テ の" ライノ アナ ニ ニカ " コンテ” シマ イ 
222, 

3640 DATA 7,0,У/ЛЭ9 ОК“ En" 
イカ マセ フン ネ 。 

3650 DATA 1,7,0,2h" £m. 
ケ マ セ ヤー。 

3660 DATA 1,7,0,^T/ スミ ニハ 、 20t»* 7"54/ 77 
n" アイ テイ マス 。 

3670 DATA 2,7,0,4994 ナン シノ アナ ナン テリ ョ ウ カ ネ 。。 7 。 
1,8&" 2" ) 2y*" ニオ モイ マシ グ タ 。 
3680 DATA 5,7,0,5*2" л. 
Мә トシ e コト 、 

3690 DATA 7,0, ソ シテ 499“ YNN" D, 
377722, 

5700 DATA 7 フ 。O。 ソ シテ 、 
=й, е ы Т Яе 

3710 DATA 7,0,8" 02 P/93-". 
"ete 


キケン リラ カミ ルム バテ SIRIL 


ソノ ヨウ ナ モ ノノ リー リカ ゅ テハ 


ソノ ヨウ ナ モ ノラ NOTIN 4 


ned Ua ALT. ` T 
「 ホ フュ ト 、 КЕ" 
W" 2"). ウシ ロラ フリ カエ ッ テ 27. 


KOZA P9977 


リス ト 4 ADV.GM.3 BASIC!) A F # 


1190 FOR 55=1 TO 5М:5ММ% (SS) =М1р% (SMM$ , S 

S,1) :NEXT 

1200 FOR SS-1 TO SM:FOR J=O TO 2』SYMBOL ( 
16*S88*J,176) ,SMM$ (55) ,2,1,7:NEXT: NEXT 
1210 MK$-INPUT$ (1) : PLAY"o6có4" 

1220 IF MK$»-CHR$(&HA1) AND MK$«-CHR$(&H 

DF) OR MK$-" " THEN 1230 ELSE IF MK* ま =CHR 

$(8) THEN 1250 ELSE IF MK$-CHR$(1Z) THEN 
1260 ELSE 1210 

1230 IF KU=15 THEN 1210 ELSE KU= に U+1 』 ММК 

$ (KU) 2MK$ 

1240 FOR І-О TO 2:SYMBOL (16*KU+ エ + さ 20 。 176 
) 。MMK ま (KU) ,2,1,4: NEXT: GOTO 1210 

1250 IF KU=O THEN 1210 ELSE LINE(16*KU+ さ 

20,176) - (16*KU*326,184) , AND , O, BF : KU-KU-1 
:GOTO 1210 

1260 FOR 1=1 TO KU:SV$-SV$«MMK$ (I) :NEXT: 

FLAY"o5f 16r16f16r16f16" 
1270 SPS-INSTR(1,SV$, " 

EN 1280 ELSE 1290 

1280 FOR し =176 TO 200 STEP 2:LINE(O,L)-( 

640,L) ,PSET,O:NEXT:FOR し =177 TO 200 STEP 
21:LINE (0,L) - (640,1) ,PSET,O: NEXT: SV$""; 

kU=0: GOTO 1180 

1290 SPL=LEN (SV$%) :S$=MID$ (SV$,1,SPS) :V$- 

MID$(SV$,SPS*2,SPL) . 

1300 IF S$-"" OR S$-" " THEN 1340 

1510 SSS-LEN(S$):FO0R 0=1 TO SSS:988$(0)- 


"11Р SPSs-1- TH 


.CHR$ (ASC (MID$ (5%,0,1) ) -&H70) :55%=55%+555 


%(0):МЕХТ:5%-55%;55%-"" 

1320 IF V$="" OR INSTR(1,V$," ")«LEN(V$) 
AND INSTR(1,V$," ")>0 THEN 1540 
zLEN(V$):FOR 0=1 TO МУУ: УМУ (0) = 


2720 DATA 4,1,ММ97% セッ マイ モノ テ " AN" o 

5750 DATA 1 」1。O。 セ マイ h'929m»" アリ マス 。 

3740 DATA 4。4 。O 。 ナ ニヤ ラ 、 ウス フ " ライ トコ ロ テ * 23. ,1,0 
。 オ w ト w ト 、 アシ モト ニ キラ IFR 

3750 DATA 1,0, マ エニ こ ハ 、 ナニ カイ ル ヨ マテ * ス ヨ 。 。 1 。0 。 ソ シテ 
Wy ヒガ が" シ ニ リ ハリ 、 ヨコ アナ カ " アリ マス 。 


3760 DATA 2 。 そ 。O 。 チ カフ ウニ ヨッ テ ミ ナ イト 37 ミエ マセ フ 。 。 さ 


2,027" 54825" スカ ラ 。 “г”. 

3770 DATA 1,8,0,5"2"W 

Ze 

2780 DATA 2 。6。O 。 ウ サキ テリ ハリ ニッ コリ h 95w74323. ,7 
,0,.nvwW*- TIN フッ ウイ テイ マヌ < ++, 

3790 DATA 2,5,0,)n^"-» 427^ T2 1 。 ラ メー トル ホ ト ” Z 
3377h" PIT 

3800 DATA 5,0,577" 
T" i i a i 

3810 DATA 3,5,0, ウ サキ "サン ハ 、 
r2" W2" Wah. 

2820 DATA 5。O 。 フ ル エ テイ マス 。 AF" IT4W/7"2. 
3830 рата 4。1 ホフ "リリ 、 99+ サフ ニー ジン ヨウ カ " 
F" スネ 。 ・・・ 

3840 DATA 1,7,0, "7т`. 
Ф“ ў“ スネ 。 」 

3850 DATA 1,7,0,29+" n. 
7” アリ マセ シェ 

3860 DATA 3,6,0,'T'^?T*.). 
テウ レダ ミタ ダイ テ " Ао 


アミ モト ニ キラ OF 2239 


アナ ニテ ラ イレ テ ミ マ シダ タカ” 2374 


Ty ANNA ТОТ ХА 


T43A 
コナ トコ ロニ 53/77) .' 25 
492092 F° FIN "M 


WU 2" UNE INDY 


3870 DATA 6,0,'09€*9.^h. アナ カラ ダー テキ マシ グ 。 ニコ ニ 
コ シテ イマ ス ヨ 。 

3880 DATA 7,0,2» シッ ホッ ニ ナニ こ カ ツイ ティ イマ ス 。 

S890 DATA 1,7,1; DOPE УАТЫ ТУТУ ЭЛ” 
Z4moTT/W ~ s... 

5900 DATA 2,7,0,7Л-55 Ф" 73997 DED ЛО 
T4252. 

3910 DATA 5,1,'7-»/ "'"z"a-. ^ ワル イト リ 。 PLP 
902797. J he 


3920 DATA 4,7,0,2h^ €. 
マエ ハリ 、 『 ジ "ミー。 3 

3930 DATA 7,O0,Nt я“ 
イー トイ ウ コ ト テ * 2, 

5940 DATA 7,1,^"2"» コレ ラ キノ ト * クニ オモ イ 、・・・・。 
5950 DATA 1,7,0,%5-2ул. タグ "イフ "ーー オチ リ イ ク ヨウ テ * 
2% 

2960 рата 2,2,0,t02- IWIM? ネコ ニテ" 471. ,2,0 
, カワ イソ ウ テ * ла. 0" カラ ・・・ 

3970 рата 8,7,0,'z"£-.2u» ナニ モタ ダバ " テイ ナカ リタ ノ テ 
“,,7,0,7% b イ ウマ ニ タイ ラ ケ " テ ニー シマ イマ ジグ 。 

3980 DATA さ 。O。 キ ミノ "7. ア ゅ 2 カ イネ 。。 さ 。 1 。 ホ "フフ ウッ 
2 CANINA ト テモ アタ タカ ナー タダ x, 

3990 DATA 5,0, "л" 9%, з 
テト コロ カラ 、, る 。 1 。 ウサ キ " サン カ " 


ヒト リ 37432. ,7,1,7 


ココス UNS FIT ダス TAT 


リノ トキ 、 Ж" 2°“ MW TT 
Met ZI" 99494. ЯЗ 


4000 DATA 5,1,Ж2-) ミナ レナ イ スカ 92 АМ" ロイ テ 、。 


う 。 1 。 ヨ コア ナニ ニケ "コンテ" シマ イマ シク 。 

4010 DATA 2,7,0,74" YR. 「 の サキ テ 」 h イ w テ 、 
イイ ヤツ リナ ング" 。 5,2, 49€ ミ マ イニ キテ ワレ テ ネ 。 

4020 DATA 7,7,0,^5"2" na 774749 

9" 45/7" 

4030 DATA 7。1 。 り カレ テシマ イマ イグ 。 


ト テ モ 
2" mw. 
PW k о» 


7n RZ カッ 29470 


4040 DATA 7,1,73 Duh" エル コト ニシ ジテ 、 
2235" ネル コト ニ ナル テ " ショ ウ 。 「 オ ヤス ミ ・・・」 
4050 DATA S,0,5*2"» Ят“ 2л 2929» D" p 
ym. カカ リマ え 。 

4060 DATA 5,1,7/749" = キト フー オリ ナジ シノ "aE" 3 
Ae 

4070 DATA 13,1,2225"/ オハ ナシ ノ PÄIN ・・・ 


PT, 


4080 DATA 
4090 DATA 


1 , 14 ,0 , 『 オ サカ ナ サ ン ダイ ヘン 」 FT Ke 

1 。14 0 。「 チ カン ニ チュ ウイ 」 9"2. 

4100 DATA 1 。14 。O。「 オ サキ サー 73775, T"2 

4110 DATA 1,14,0,*&"2"29 ЭУ un し 。 9*2. 
4120 DATA 1,9,0,/9-у キー 9 "Ж%у) b タタ キマ ショ 
e 


CHR$ (ASC (MID$ (V$,0,1)) -&H70) : VV$=VV$+VVV 
$ (0) :NEXT: V$-UVV$: VV/$2"": GOSUB 1360: RETUR 
N 

1340 S$-"":889$-2""i:U$-""i:UVV$-"":KU-O: GO 

SUB 1560:60Т0 1180 

1550 ° 

1360 FOR し =176 TO 184 STEP 2:LINE(O,L)-( 
640,L) ,PSET,O:NEXT:FOR し =177 TO 184 STEP 
2:LINE (0,L) - (640,1) ,PSET,O: NEXT: SV$z""; 
KU=0: RETURN 

$370 * 

1380 FOR し =175 TO 32 STEP -Z:LINE(O,L)-( 
640,L) ,AND,O:NEXT:FOR し =174 TO 22 STEP - 
S:LINE(O,L) -(640,L) ,AND,O: NEXT: FOR L=173 

TO 32 STEP -3:LINE(0,L) - (640,L) ,AND,O:N 

EXT > 

1390 RETURN 

1400 ' 

1410 RESTORE 2430: GOSUB 1100 


1420 IF S$-"EkGKm" AND V$-"KfCUg" THEN Н 
AV (14) =O: ММ2=0: GOTO 1470 
1450 IF S$-"EKFUKm" AND УФ-"РВ1т" THEN Н 
АУ (14) =1: ММ2=0: GOTO 1470 
1440 IF S$-"OFmV" AND У%-"О-СВ" 
(14) 20: MMZ-1:GOTO 1470 
1450 IF S$z"^n*nHm" AND V$-"Fnmznj" THEN 
НАУ (14) =1: ММ2=1: БОТО 1470 
GOTO 1410 
RESTORE 2450: GUSUE 1100 
IF S$-"Ln»G" THEN 1490 ELSE 1470 
GOSUB 1380:RESTORE 2460: GOSUB 1100 
INS$-ZINPUT$(1):IF IN$X2CHR$(13) THEN 


THEN HAV 


Qe 


RE 
OE E 


106 


ん じゃ な いか と 思い ます が いか が で し ょ うか >, 
PS; тал, 今 こ を JR。M5, SC の 時 代 で す 。 も っ と 買お う . 


これ か ら は 16 ビ ピット ・ マ シー ン の 時 代 で す の カ ノン さん (7 月 号 p.100) へ . PASCAL は いい の で す が , C は エレ ガン ト な リス ト と は 言え な い 
それ に BASIC で も WHILE な どの 命令 を 使え を ば PASCAL っ ぽい リス ト を 作れ る ん で す よ . 
(横浜 に 引っ 越し た の で , さっ そく 大 人 貫 妙 子 を 見 に 行っ ちゃ う COPINE で す ) 


1510 

1520 GOSUB 1380:RESTORE 2600: GOSUE 1100 

1530 IF V$-"'i" AND S$-"FG" THEN RESTORE 
2620: GOTO 1610 

1540 IF V$-"'i" AND S$-"EFnl" 

RE 2630: SKNz1: GOTO 1610 

1550 IF V$=" ZUM" AND S$-"KFU"' AND SEN=1 

THEN 1560 ELSE 1580 

1560 IF MMZ=1 THEN RESTORE 2640:FSP=1: GO 

TO 1610 

1570 IF MMZ=O THEN RESTORE 2660:GOTO 161 

о 

1580 IF У%-"Ті" THEN IF S$z"Z?Zo" OR S$- 
"2" THEN IF FSF=1 AND HAV(18)-0 THEN RES 

TORE 2670: НА“ (18) =1: GOTO 1610 

1590 IF V$-"ZBi" AND S$-"PG" AND HAV (18) 

=1 THEN RESTORE 2680: БОТО 1630 

1600 RESTORE 2690 

1610 GOSUR 1360: GOUSUE 1100: БОТО 1530 
1620 ' 

1630 GOSUB 1380:RESTORE 2700:6050В 1100 
1640 RESTORE 2720: GOSUB 1360:GOSUB 1100 
1650 IF V$-"cdM" AND S$-" ?Q" AND MCH=O 

THEN MCH=1: GOTO 1670 

1660 GOTO 1640 . 

1670 IF HQV(B)=1 THEN 1750 

1680 RESTORE 2750: GUSUB 1360: GOSUB 1100 
1690 IF V$z"'i" AND S$-"^X" THEN RESTORE 
2750:HO0N-1:GO0TO 1740 

1700 IF V$=" ZUM" AND S$-"^X" AND HON-1 А 

ND HOH-O THEN RESTORE 2760: HOH=1: GOTO 17 

40 

1710 IF V$-"TnIi" AND S$-z"^X" AND HOH=1 

THEN RESTORE 2780: HMO=1: GOTO 1740 

1720 IF V$-"Ti" AND S$="BL" AND HMO-1 АМ 

D HAV(8)-O THEN RESTORE 2790: HAV (8) =1: GO 

TO 1740 

1730 RESTORE 2690: GOSUR 1360: GOSUR 1100: 

GOTO 1690 

1740 MCH=0: BUSUE 1100:RESTORE 2740:GOSUR 
1100: GOTO 1650 

1750 RESTORE 2710: GOSUB 1360: GOSUB 1100 
1760 IF V$-"MMa" AND S$="[CFnL" THEN 1790 


THEN RESTO 


1770 RESTORE 2690: GUSUE 1360:GOSUB 1100: 
1760 


GOTO 
1780 
1790 GOSUE 1380:RESTORE 2800: GOSUR 1100 
1800 IF V$-"'i" THEN 1810 ELSE IF TIL=1 
THEN 1850 ELSE 1890 

1810 IF S$-"G" AND TIL-O THEN RESTORE 28 
10: TIL-1:GOTO 1900 

1820 IF TIL=O THEN 1890 

1830 IF S$-"PF" OR S$-"Ln»Qe" 
E 2840:GOTO 1900 
1840 IF S$-"XMn'" 
RE 2850: GOTO 1900 
1850 IF V$-"UIni" AND S$-z"BL" AND ЗНІ=0 
THEN RESTORE 2860: SHI=1: GOTO 1900 

1860 IF V$-"RFC" AND S$-"kGxXxo"-AND TKU-O 
AND SHI-1 THEN RESTORE 2880: TKU=1: GOTO 
1900 

1870 IF V$-"LZni" AND S$-"AL" AND TKU-1 

"AND OFK6=0 THEN RESTORE 2890:0K6-1:GOTO 1 

900 

1880 IF V$-"ZUM" AND S$-"GRX" AND ОКё=1 

THEN RESTORE 2900:0k6-2: GOSUB 1100: TKUzO 
:FOR I-O TO 3OOO:NEXT:GOTO 1920 

1890 RESTORE 2690 

1900 GOSUR 1260:6060В 1100: GOTO 1800 
29145. 

1920 GOSUB 1380:RESTORE 2920: 60508 1100 
19350 IF УФ-"К M" AND S$-"eb" AND YUM-O T 

HEN RESTORE 2960: YUM=1: БОТО 1970 

1940 IF YUM-zO THEN 1960 

1950 IF V$-"ZUM" AND S$-"GRX" AND КӨР-О 

THEN RESTORE 2970:kSP-1:GOSUB 1100:GOTO 
1980 

1960 RESTORE 2690 

1970 GOSUB 1360: GOSUB 1100: GOTO 1950 
1980 GOSUB 1360:RESTORE 2990:GOSUB 1100 
1990 IF S$<>"Ln>@" THEN 2020 

2000 IF V$-z"RB^C" AND ANS-O THEN GI-2: AN 

5=1:НАу (17) x1: RESTORE 3010: GOSUB 1100:ҒО 

R I=0 TO SOOO:NEXT:RESTORE さ OOO GOSUE 11 

OO: RESTORE 3040: GOTO 2070 

2010 IF V$-"YJM" AND ANS-O THEN GI-1:4NS 

=1:HD=1:HAV(17)=1: RESTORE 3000: GOSUR 110 

O:FOR I-O ТО 5000: МЕХТ: КЕЅТОКЕ 3020: БОТО 
2070 

2020 RESTORE 2690: GOSUR 1100:GOTO 1990 

2030 IF V$-"RFC" AND S$-"UEX" AND TKU-O 

THEN RESTORE 3050: TKUz1:GOTO 2070 

2040 IF V$-"ÜOi" AND S$-"AP " AND HD=1 АМ 

D TKU-1 THEN RESTORE 3030: HD=2: БОТО 2070 

2050 IF УФ-"ММа" AND S$-"GF" THEN IF HD= 

2 ОК Gl=2 THEN TKU-O:GOTO 2090 

2060 RESTORE 2690 

2070 БОБОВ 1360:GOSUR 1100:GOTO 2020 

2080 ' 

2090 GOSUR 1380:RESTORE 3060: GOSUB 1100 

2100 IF V$-"ETM" AND S$-"P " AND DR-O АМ 

D HAV(17)-1 THEN RESTORE 3070: DR=1: БОТО 

2130 

2110 IF УФ-"ІРІі" AND S$-"F1" 

EN GOTO 2150 

2120 RESTORE 2690 

2130 GOSUB 1360:GOSUB 1100: GOTO 2100 

2140 ' 

2150 GOSUE 1380:RESTORE 3080: GOSUB 1100 


THEN RESTOR 


OR S$-"QGJ" THEN RESTO 


AND DR=1 TH 


2160 IF V$-"'i" AND S$-"PSxXFn" THEN REST 
ORE 3090:GOTO 2210 
2170 IF V$-"WH" AND S$="FS¥Fn" AND FUL=O 


THEN RESTORE 3100:PUL-1:GO0TO 2210 
2180 IF V$-"Ti" AND S$-"G?Xo" AND PUL=1 
AND НАУ (16) =0 THEN RESTORE 2110:НАУ(16)- 
1: GOTO 2210 
2190 IF V$-"MMa" 
=1 THEN 2230 
2200 RESTORE 2690 
2210 GOSUB 1360:GOSUR 1100:60Т0 2160 
2220 ' 
2230 GOSUB 1380:RESTORE 2120:GOSUB 1100 
2240 IF V$-"ASi" OR V$-"Xji" THEN IF S$- 
"S" AND ОР-О THEN RESTORE 3140: OF=1: GOTO 
2270 
2250 IF V$-2"ZBi" AND S$-"Ttng" AND OF=1 
THEN RESTORE 3150: GOSUB 1100:FO0R I=0 TO 
8000: NEXT: GOTO 2290 
2260 RESTORE 2090 
2270 БОБОВ 1360: GOSUE 1100:GOTO 2240 
2280 ' 
2290 GOSUB 1380:RESTORE 3160: GBDSUE 1100 
2300 IF V$-"ZBi" AND S$-"^gAU" AND DEN-O 
THEN RESTORE 3170: DEN=1: GOTO 2340 
2310 IF V$-"ZUM" AND S$-"Zi" AND SPA-0 А 
ND DEN=1 THEN RESTORE 3180: SFA=1: GOTO 23 
40 
2320 IF V$-"AIni" OR V$-"1PM" THEN IF S$ 
-"G?X6o" AND SPA-1 THEN RESTORE 3190:60SU 
B 1100:FOR I=0 TO 8000: МЕХТ: БОТО 2560 
2330 RESTORE 2690  . 
2340 GOSUE 1360: BUSUB 1100:GOTO 2300 
2350 ' 
2360 GOSUB 1380 
2370 IF GI-1 THEN RESTORE 3210 ELSE IF 6 
1=2 THEN RESTORE 3220 
2380 GOSUB 1100 
2290 IF УФ="сК" AND S$-"AL" AND GI=1 THE 
М RESTORE 3230: GOSUB 1100:G0TO 2420 
2400 RESTORE 2690 
2410 GOSUB 1360:G08UB 1100:GOTO 2390 | 
2420 PLAY 


AND S$-"VL" AND HAV (16) 


"o97d32ri1ó6d32c8r4o6f 32d 352r160S5d 
16r32d32r312a32gg","07c32r16c3206g8r4e32c 
S2rió6o4ciórZ32ciór3203gió60o04cc":END 

2430 DATA 5,5,0,%% 3 ма? / N" TUF" **,7 
:10,жжж 

2440 DATA 7,0,742hn"» 2227272 

2450 DATA 2,7,0, "77, / TIIN. ТУФ” 29. 7,0, 
y" bh イレ テ ネ 。 

2460 DATA 15 

2470 DATA 7,0,!"??- 4I? Ро, 

2 OTI レル オト テ " 、。 7 。 1 。 メ 9 サマ シマ シグ 。 」 
2480 DATA 7,0,:5-/ カセ "ノウ "アイ ハリ 、 スッ カリ 377% 
3597. 74.1.7293" 009 9797707 イマ ジグ ダ 。 ones 

2490 DATA S,0, NZ a h 'u'"Z£—-, WW 585087 

3 トリ ナカ " ラ ・・・ 

2500 DATA 4,0,95'£-— ғ... г ОМ. Кау 
729" Kas 
2510 DATA 6。O。 ホ "フー・・・・ 


РАЙ も よっ 


CR" ウフ "リク チラ 57797 


イル ンダ" 。 」 
2520 DATA 4,0,%5- .... го" ру 4"2/n0U-. 
"n, %. 

2530 DATA 4,11,К92Л ジテ ホシ イン タダ 。 ЖУ) ミン ナカ " 
2540 DATA 4 。1 さ 。 コ マリ ウ テ ル 。 3270" イタ" 。」 

2550 DATA 6。O。 ホ "フー weca TILH 4"2/722" 9" 
лэ. ウフ 。 イイ ヨ 。 4 

2560 DATA 7,0,-““-“%“%-- トーイ ウ コ ト テ " ハナ シカ "マト 
マリ 、 

2570 DATA 7,12,7/74%/9/). "9%, / 71799. 
2580 DATA 4,0,%5- .... тж“ уу, ココ テ ^ カエ ルカ 
ラ ネ 。 5729" 3. j 

2590 DATA 9。0 。 リ ター ン キー Э Rll b 273. サキ 
ШАМАН 

2600 DATA 3,7,0,^^2"/ マエ ニハ ЭФ” 7U337.,7, 


0,47) ヨコ ニハ オカ が" ワカ" 
2610 DATA 7。O』 オ カ " ワ ノ キシ へ * сл. 
Mam アリ マス 。 

2620 DATA 2,5,0,h7€t キレ イナ £270) TD し レ テ イ マス 。 


Tn" し テイ マス ヨ 。 
ҺЕ オオ キナ Cw 


1:844. TES at war ry 5990549332 
2650 DATA 2,6,0,49727У9Л. AS4T" 4223» ,6,1 
ӘР КЛУ ЯК 50307... 


2640 DATA 3,7,0,'7w. FINN. アノ トド トキ ж" ウニ ミミ スス" 
э ワレ タク ヒ に ト の 9" Ro 

2650 DATA 7,2, オ レイ ニー イイ コト オシ エ テ ア ケ " ルネ 。 
AAN 9 bw7T,7,2,7*T- MSFT 22641 
2660 DATA 1,7,0,77"7 27 
... 

2670 DATA 1,3,0, R“ 72“. 
ワリ ニ モ も ゅ ティ イマ ス 。 

2680 DATA 2,5,0,Ж"7,), SRI RLNW2hT7 К??? 
"UL ハイ リマ シグ 。 s... 

2690 DATA 1,2,5,%%% 43 77) IOK“ ウ カ "ワカ リマ セ 
Do*** 

2700 DATA 1,9,0,58"2") 8929) TRIN 
JY. ee 

2710 DATA 1,3,0, EN シノ オウ ニ IFN ミエ マス ヨ 。 
2720 DATA 1,1,0,247255^* 7-4 51743. 

2730 DATA 2,5,0,*^"2"/ 77V) スコ シ アカ ルフ ナリ マシ タダ 
жаза Кк 902794 THZN Ай, е ugs 7 тап” 93 PM 
716 

2740 DATA 1,1,0,2w*) 272 キ エ テ シマ イマ ス 。 
97 ナリ マシ ジグ < 

2750 DATA 1,15,0,2%99 25:9“ 


Veit 
Ж 2*7. “Ж 


オオ キナ NON a? num" 


マタ 2 


xz" АТУ e 


ЕД 
2760 DATA 5, 12,0, гл“ 39у 77% RON ¿hu "Y 
ルク ーッ ク 。 コノ €U9.,12,1,^49 ニシ テ ネ 。 


2770 DATA 10。1 。 市 "ウノ 7979 К5%2 ラッ 。 ^? N 


PIO 


リス トス 4 ADV.GM.3 BASIC!) A F 


"wo J 
2780 DATA 1,15,0,22"27"54J) АУ”. > 


2790 DATA 1,15,0,ж 7" 499 FRY, 
2800 DATA 2,5,0," 273 ят” マコ トカ "テテ " キマ シグ ダヨ 
.,7,0,8" 2" マエ ニハ サン ホッ ソフ エタ" ノ 、 "ж." 7U22, 
2810 DATA 5,6,0,19"/ イッ ホ ッ フ ニー 9n) гуча. 
トマ ゅ テイ マス 。 。 6 。 1 。 ソコ ハ ネス "ミノ FI N". ヲタ ノシ ソウ 
І アル イ テ キ マ :/。 
2820 DATA 3,1, ト "ウラ Гэ“ а-л) 「 チ ー コ 」 ラ ネ ラ ゅ ティ 
30*"2.,.2,1,27"3—07. ジマ ン ノ ハネ ラ ЕП” マシ タ ヨ 。 
2830 DATA 2。0 。「 チ ー コ コ ニ К ウ コ ウ イリ テイ ル ETN アリ マセ 
L3. 
2840 DATA 1,5,0,U9w)* у ハネ ラ EOP" テニ イマ ニモ ht" 
タダ トウ トミ / テ イマ スズ 。 
2850 DATA 1 。5。O 。 フ フキ ニ の タダ タイナカ" ラ アル イ テ イ マス ヨ 。 
2860 DATA 4,7,0, Rms イシ ハハ 、 タカ "ショ ー」 ノ アタ 
2279). ,7,0,278-^) ft" ジテ ジマ イマ ジグ 。 
2870 DATA 7,0,%79Л749%2. ニケ “ナイ ヨウ シナ ケレ ハハ" 
ナリ マセ ン 。 。 4 。 O 。 ア シラ ナニ カテ * ・・・・ 
2880 DATA 1,6,3,** ロー フ ? 3 リカ ウノ テス ネー ж 
2890 DATA 3,7,0,2*a-^ モウ 27° ラ レ マ セン 。 スル ト 、。 
7,0,9Л5) ナカ カラ モリ ノ ナカ マラ ヲリ レグ жуз” ヤ ゅ テキ マシ タ 
.,7,0,727 イイ タ ソ ウ テ * 22. | 
2900 DATA 4』6。0。 キ リネ サン .... "ФЕ 5947 ユウ カン 
TERN 42" ラ シ イ 。 ,6,12,7" 3-9 ヤッ リリ ケ テ ワ フレ ルナ ニテ 。 3 
2910 DATA 5,0,2У%у ..... FILHS 2"a-/ va* 
9 ミン ナ テ " キメ マス 。 。 1 さ 。 12 。 ト "ウソ "コテ ラ へ 。 」 
2920 DATA 7,7,0,5*2"A ミン ナニ リ レ ラ レ テ 
7274 サレ マシ ダ タ 。 。 7 。 O 。 ソ シテ 、 キツ リネ サカ" 
2930 DATA 5。O。「 コ レ カ ラ シ " ョ ー ニ ツイ テ 、 94073 dar 
イマ ス 。 ,5,53,2270. У27" 374777" サイ 。 」 
2940 DATA 6,0, 77° – 7-, RTN イリ ノ マ ニ カ 24% 
テシマ イマ シグ 。 。 6 。 1 ホフ トリ 14,9 ミ テイ マス 。 
2950 DATA 7,0,272*") 4"U37"9wTt オキ レ マ セ ン ヨ 
2960 DATA 2,7,0 5" 7" л. 
キリ ネ サ ンカ " 、 ナニ カイ ゅ テイ マズ 。 
2970 DATA 5,5,0, 77" а-29 コノ モリ カラ り イ ホウ スル コト 
= キマ リマ シタ カ " 、。 5 。O 』 ホ フト サリ 、 ト * チ ラテ "スカ 。 』 
2980 DATA 12,2,2"a- リウイ ホウ 39) u"a- ノコ スト 
サレ テ ネ 。 
2990 DATA 1 。 さ 。O。「 ト "チラ テス カ ュ 
3000 DATA 8,7,0,*a92"v*v972/) 2209h" テ " テキ フシ タグ 
e, 3,0, u"a- 5947 ЕЛ" ОЬ. ,3,0, Ма” 
コナ イカ ラナ ンジ“?。 2 30, WI サカ "ジニ イ ゅ テグ クレ 。。 さ 。O 
Q1?717235 F キン コト ハハ T9D0..,3,0,'23/ シロ イタ マッ 」 ラ 
09957437. コレ ハ ミン ナノ ツメ クイ ココ ロラ 、。 マ 。O 。 ト ジコ メタ 
^ш“ po a ,11;0,;7:77 ヤグ クニ タリ" ヤロウ 。 f» 8785” у 
oJ 
3010 DATA 1,15,0,2"a-) コノ モリ ラ 3592" 17:75. 
5020 DATA 4,7,0,*h^9 RF IY My 9229329" の 
VES JUS Lo УО bU. ЕЛ. кию”. 9994, 
,7,0,%а-/ 2929 ナニ カラ リカ ゅ テ 、。 7 。O 。 マルメ テ モラ イマ シ 
аб» "NW "со J 


"EB aL 
442225 


オキ マシ タダ 。 .....,7,0, 


5050 DATA 2,7,0,»"m-/7 アタ マリ ハリ лу" 57997 TNF 
hl ナッ テシマ イマ シッ グ 。 ,7 0," g- Y リス "カッ ツテ ЛЗ 
әт” イキ マミ / タ ヨ 。 

5040 DATA 1,7,0, bh. 
5050 DATA 1,6,3,** ナイ フラ рот“ лл жж 


ィ ウ コト テ ~ ス 。 3077. 
3060 DATA 2。7。O。 オ オキ ナ NIN ナカ * レ テ イ マス 。7 。0 。 コ 
ノイ ママ テテ" ハー ワク ルコ ドカ" テキ マセ ンー。 コマ リマ シグ 。 

3070 DATA 1,1,0,9) ミ フ ナノ "494 ココ ロ ノ タメ ニ 
コ オ リ リ キマ シダ 。 

3080 DATA 1,7,0,9»27"m»'. ダリ テ イマ スズ ヨ 。 

5090 DATA 1,7,0,97»292"X 7"57"5 7° 23. 

3100 DATA 1,5,0,99715. ナニ ヤラ 「 キ ゅ プ ? OTE 


“ 
. ... 


5110 DATA 
E472, de 
3120 DATA 7,7,0 ,22л. 

Кесел тулды RSA N 
лл» 「 ナ リュ ウン カ 。 ハイ ゅ テク ワレ 。 
5150 DATA 2。O 。 キ ミノ アタ タカ サラ VIRE" ラニ アテ ルト 。2。 
1,ht"5) ヒラ の 。 7 Q y b” 979 ナカ ニ イ ル М. бу. Ж” 
2"9 ナツ リュ クワ ント 7 。 1 IFN w チ イル ヨコ ウデ” スネ 。 
5140 DATA 1。7。0。「 ガ "タダ 、 R R -, МСЭ 
ga. 

5150 DATA 7,5,0,7Л2 /4ч?Һ?У Ж“ フル 2h72 
ウソ ナッ テシマ イマ シグ 。。 85S.。0 。 ナ ント ソコ こ ニハ RO IIS OT 
24". 4,5,0,V29^ 4122772" 2, 。 7 。O 。 コ コル ハ 、 59%) rv 
ソノ コウ グイ ラ ТЫУ 5987/9" 2,,95,0,9^ スカラ コノ ヤマ ノ 3 
DUM 5772290407. ココ リハ ERU ФЕУЛАРА Cia 

7/%22,14,0,Ж7-, フル レキ" ナ ト コ ロニ 49/7 2» 
3160 DATA 1,7,0,47-,Л フラ フラ アル イ テ イ ルウ チ ニ ホラ ア 
тә マエ ニ 139974 
3170 DATA 1 。 さ 。O 。「 ハ ) ル ュ サ ンカ” ナニ カイ イタ ソウ テ " л. 
5180 DATA 3S,3,0,9EA (79,75) 9" 402077, v" 
"Us “ISO FALTER 2994238927 "925,9 7797У7 
029". SO, DIO ФЕ ジラ ナイ カナ ァ ー +, 
3190 DATA 6,5,0, 72109". ウン 、 107". PYN КЭ» 
4,3,0,72/7" 597 90207“ ウレ ル 。 」。 7 。0。 ソ ノ ト キ Ж" 7 
“A PY ウナ ゅ テッ ウ イマ シダ タダ ・・・・ 。 15 。O 。 キ カリ フト シロ イタ マラ 

オト シタ 39/7 жс オレ テイ マシ グ 。 

200 DATA 7,1, 7.9727 ANT" F° 34Un hTTwTÁ 
Ae,12,0,T0"7 「 シ レシ" ョ ー」 力 " ナカ マラ "ULT ヤッ テキ マシ グ ダ 。 
3210 DATA 2,4,0,「 ア ノ ト キハ PIN トウ 。 キミ ノ オ カ ケ " y" 

Z"wh 2/tU-,4,1,4WM2h0" 7?" キル 。 オレ イニ 1197“ 3 
TUN 797 tafea 
5220 DATA 1,4,0,2"a- IFA 
T4 W7" yy" Ze 
5230 DATA 8,7,0,^" 2" 4777, rV" 9722 TOP 

Fa kia ANRETT aU Атса 
7,7,0 6У/ ミン ナカ ーー ルアウ 2 ナッ リヴ グ コト ハハ パイ ウッ チト Ұ747 
E T VO ROAR ION EIA T 3 IMXO 
w PPS. 475027 DA S" IPM АУА АҚТЫ 
929. ,5,0,4%““"“.. AFP, Ду“ 2 
3240 DATA 4,0,2VL7" コノ ニー オ リナ ジリ ルー オ マイ テ " 26 
ロウ サマ 。 。 1 0 。 O 。 テ イキ ョ ウリ) ダキ モト ワー ту? 


1,3,0,4^ 2"). 74994 ナン タ " ロウ 。 h オ 


ヤマ ヘ ノ ニー イリ 2" *. ,7,0,47/7 
VIRE ラニ チカ ヨル ト 。7 。 1 。 ナ 


ヒラ キマ 


ソラ ラ 7" 7° y. 77% 


e pid 


107 


۳ ヽ =- ` 
МАНТУ OSSA. 8:05 / 
CV SAI BEETS "seb, 7 
Яз Аа ы "人 で 4 / 
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俺 は 人 間 に 作 られ た 清掃 用 ロボ ッ ト だ. 
まあ それ に し て も , 人 間 と いう や つ は ゴミ 
を 所 か まわ ず 捨 て すぎ る . だ か ら ネ ズミ や 
ハエ の 化け 物 が うようよ と は び こ る ん だ . 
その 尻 ぬ ぐい を 俺 が し な くち ゃ な ら な いと 
いう ん だ か ら 困 っ た も ん だ . これ も 人 間 に 
作ら れ た ロボ ッ ト の 宿命 な ん だ ろう か 、. 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


マシ ン 語 9000—AFFF 


最高 速度 に する と か な り 難 し く な り , 
| わり と 熱中 し て し まい ます ね . 


あな だ た は ロボ ッ ト と な り , 路上 の 掃除 と , 


* プ タネ ズミ バハ エト ン ボ ” な どの 退治 を 
し な けれ ば な り ま せん . 

ロボ ッ ト の 動か し 方 は , オー ンド ックス 
[8| [2] [a] [6] キ ー で 上 下 左 右 , 
| SPACE | キー で 破裂 弾 を 投げ ます . 

Хы, ゲー ム ・ オ ー バ ー は 化け 物 に 何 度 
か 接触 する か , 長い 問 ジ ュー ス を 飲ま な い 
で エネ ルギー が 減り 900 に な っ て し まっ た だ と 
ОЗ; 


O 
мо CA2C+23C+23C+-C+23C123C+23C1+2C+2C+3DC+2C+23C+2ƏC12C123C+3C+3ORF3 


Лее 


DÍOC4OCOH)C90OH3C*9)0O90O*9)0O1990O9090H29O9O*99*90O909O*9O0ft3 


何ら か の モニ タ か ら リ スト を ミス な く 打 
ち 込 ん で セー し ます . 実行 は 電源 を ON 
に し, 直接 IPL か ら プ ログ ラム を 読み 込め 
ば スタ タート し ます 。 


グー ム 選 つい で 


Add 


9000 
9010 
9020 
9030 
9040 
9050 C 


エネ ルギー の 増減 


増え る 場合 … ジ ュー ス を 飲み 続け た と き . 


デミ を 捨 っ た と き 。 

減る 場合 … ロ ボッ ト が 一 歩 進 む ご と に 1 
だ け 減 少 す る . 化け 物 と 接触 する と 接触 面 
積分 どけ 減少 する . 破裂 弾 を 繋 っ た と き . 
② ス コア 

ゴミ を 拾っ た と き … 持 っ て いる ゴミ の 数 
x 1075 

ゴミ を ゴミ 箱 に 捨て た と き … 持 っ て いる 
ゴミ の 数 100 点 —— 

破 像 漠 が 化け 物 に 当たっ だ た と き …:30 点 
@⑯ プ タネ ズミ , ハエ トン ボ 

くる くる 回 りな が ら 接 近 し て きま す . 
破裂 弾 返し 

7 面 以降 ロボ ッ ト の 真正 面 か ら 破裂 弾 が 
降っ て きま す . 化け 物 と 同様 エネ ルギー が 
吸い 取ら れ ま す . 
⑳ ジ ュー ス 

エネ ルギー の 補給 用 で , 面 が 進む ご と に 
出現 が 少な が なくなり ます . 

ӨС š (TRASH) 

体 当 た だり し て 拾う と スコ ア が 増え , 画面 
右 の TRASH が 増え ます . 画面 の TRASH 
の 所 の 数 字 は 現在 持っ て いる ゴミ の 数 で す 
(ゴミ は 捨て ず に だ め て お くく 方 が スコ ア を 
か せ ぐ の に よい ). 

@ -í š #ë 

路上 の 端 に ある ゴミ と 書い て ある キャ ラ 
クタ で , 体 当 た りす る と ゴミ を 持っ て いれ ば 
スコ ユア が 増え , 持っ て いる ゴミ の 数 も 0 に 


そろ そろ ゴミ を 捨て よう か な ー-? 


9060 
9070 
9080 ос 
9090 
9oao 
ŞORO 
осо 


グラ フィ ッ ク 文 字 出 力 
音楽 用 レー チン 
乱数 発生 

初期 処理 

ロボ ッ ト 

キー イン 

破裂 弾 

ゴミ 箱 

- Ei 

ジュ ー ス 

化け 物 
音符 , パタ ー ン ・ デ ー 


な り ま す 。 
QRANGE 


進ん だ 距離 を 示し , 500 で 面 ク リア で す . 


⑳ ス ピー ド の 選択 


ゲー ム の 始ま る 前 に スピ ー ド を 聞い cs 
iT. [F']-|FY02 CO * — ## L < < 
だ さい . [FT | が 最高 速 で す . この と き は 


ロボ ッ ト の 走行 音 が 消え ます . な お 前 に 選 
択 し た も の の まま で いい な ら 他 の キー を 押 
ぜ ば ゲー ム ・ ス ター ト し ます . 


この プロ グラ ム は , ゲー ム 中 に | カナ | キ 
ー を 押す と ポー ズ ( 中 断 ) 機 能 が 働き ます . 
また だ 画面 は すべ で て グラ フィ ッ ク で 表示 きれ 
C, キャ ラク タ 画 面 は 使用 し て お な おり ま せん . 

話 は 変わ っ て , 私 の 所 属し て いる 山形 東 
高校 の 物理 部 マイ コン 班 に は , マイ コン が 


だ っ だ 1 台 PC-8001 し か な い 。 いま どき こ 
ん な 部 が あっ て よい の か (購入 する 予定 も 
一 応 は ある ). 
山形 東 高校 物理 部 に 明日 は ある の か / 
3 参考 文献 
1 “WICS BASE プ ログ ラム 集 ", 工学 社 
2) 居候 VALZA: “DONG HUNTER”, 1/ 
O, "83 年 2 月 号 
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DIZZINESS マシ ン 語 リス ト 


9200 
9210 
9220 
9230 
9240 
9250 
9260 
9270 
9280 
9290 
92200 


O1 AF 
01 АҒ 


私 は PC-1245 を 持っ て いま す が , すご いこ と を 発見 し まし た . な ん と PC-1245 は 簡単 に "INS" を 使う こと が で きる ん で す . その 方 法 は , 


iut 
VM 


を 書い て すみ ませ ん で し た ご めん な る きい. 


K.C.C. の NOP き ん. 今度 PiOPiO に 出 て くだ さい . 


まず [SHIFT | を 押し ます . その 次 に , [ВЈ Ow U ++. さあ INS( イ ン サ ー ト ) が 使え まし た . b, どう も すみ ませ ん とこ ろ で 1/08 月 号 
ケ コ ン に よる INS」 が 載り まし だ 。 すご いで すね ーー. 


お 願い し ま ー す . 最後 に アホ 
( 香 月 舞 ) 


жо 
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DIZZINESS マシ ン 語 リス ト 


^ ©) Q (O) 3D カ ー レ ー ス が ずい ぶ 
Ол Ол те, どう に か し て て くれ. 


s: 
に の 
に 


оо 
1C 


ん 増え た よう で す が , どれ も 大 事 な 物 を 忘れ て いる . 


ラー が な い の で す .。 よく 考え て みる と 。 


こん な ひど い 車 は 
(し ゅ っ 教 の 神 ) 
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DIZZINESS マシ ン 語 リス ト 


スト ー リ ー 

565, Кк, тле ли КЛ А 
っ て 異 星人 に 捕まっ て し まっ だ. これ か ら 
脱出 を 試み る . さい わい オレ の 船 の 隠さ れ 
だ 所 は わか っ て いる . 

し か し , 動か す に は 3 つの パワ ー メ タル 
が 必要 だ. しかも, 脱出 で きた と し て も 敵 
異 星 人 の ロボ ッ ト が 待ち 構え て いる . 死ぬ 
か も し れん が ,。 や っ て みる し か な いん だ …. 

それ で は 地球 防衛 軍 .、 も し この 通信 を 受 
け て いた だ ら 6 成功 を 祈っ て くれ / 


ゲー ム の 説明 


1 一 3 面 は ボウ ル か らら 逃げ な が ら ,。 $ を 
全部 取っ て 上 に あがる と メタ ル が 現われ る 
ос, それ を 取れ ば 1 面 ク リア で す ( 図 1). 

4 面 は ボウ ル が 1 匹 増 えて , 上 に は ヴァ 
ー ン ( 船 ) が 初め ゆめ から 置 いて あり ます が , シ 
ャ ッ タ ー が 閉まっ て いま す . $ を 全部 取り 
終え た 直後 , 約 10 秒 間 ど だ どけ シャ ッ タ ー が 開 
(DT, その 間 に 船 の 所 まで 行っ て くだ る : а 
v. 行け な けれ ば 自動 的 に 死に ます ( 図 2 )、 р 0 Я. е" 

5 面 は ゲー ム 的 に も ガラ リ と 変わ り , > | 
ュー ティ ング ・ ゲ ー ム と な りら ます 。 前 方 か 
らく る 流星 を よ け な が ら , 異 星人 の ロボ ・ 
ジル と 戦い ます . 
gis, 命 は ビル が 3 人 で ヴァ ー ン が 3 機 
С | 


Qe Ken 
1! ゲー ム 画 面 1 図 3 ゲー ム 画 面 3 
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BASURA 


AEVO ME RE: —2 52708 L Cv 2 zx, 
「 単 純 明快 な ゲー ム を ノ 」 と いう わけ で 
まず は その 手始め に この 「 ス ー パ バ パー バズ 
ー カ 」 を 作っ て みた と いう わけ で すず す 。 


画 プ ログ ラム ・ イ インフォメーション 


zT WICS 
"| マシ ン 語 A000—A9EF 


ЕЕЕ. 
性 うっ ココ っ 
B) 


| な か な か 凝っ た キャ ラク タ で すね . 
F| | ルー ル は 単純 で す が , "T 


入力 方 法 


この プログ ラム は , WICS-2000 の バー 
ジョ ン 2.0 で 動作 し ます . 

まず は イン ター プリ タ を 起動 きせ , ツー 
スー ピロ グラ ム ( リ スト 1) を 入力 し ます 
(セー ブ も 忘 む ず に )。 «xiv opm 
(リス ト 2 : $A000—$A9EF) 2 AJ) LU #7. 

一 通り の 入力 が 終わ っ だ と ころ で ユン フ \ 
イラ を 起動 きせ , ソー ス ・ プ ログ ラム を っ コ 
ン パ イル し ます . Жо, 手順 は 次 の と お り 
CT. 
Source Program : $4800 
Object Program: $8500 
Work area: $FOOO 

£ Ü Gy е шу S ЕТУ АЛА, дан З 
£ Ł 9(98500--ФА9ЕЕ), スタ ー ト ・ ア ド 
レス を $8500 に し て モー ブ し ます . その 後 , 
これ を WICS の モニ タ か ら ロ ー ド する と, 
只 ー ト ・ 素 メー トド する わけ て すず す . 

と に か く , すべ で て 終わ っ だ ら 6$8500 へ ジ 
TOETATA だ も ちい 、 


遊び 万 


ゲー ム の 基本 的 な ルー ル は , 「 マ イコ ュ コ 
ン ・ ゲ ー ム の 本 | 1|」 の MZ-1200・80K/C 
版 と 同じ で す . 要する に 時 間 内 に で きる だ 
け だ くさ ん の 敵 を や っ つけ れ ば 良い わけ で 
Y. 

だ だ し この 2200/2000 版 で は , ФОК/С 
版 「 ウ ィ リ アム ・ テ ル 」 よろしく の 連続 撃 


SUPER 


スー パー バズーカ 


ち が で きま す . 知ら な い 人 の だ め に 説明 す 
る と , バズ ー カ の 弾 を ミス せ ず に 連続 し て 
英 ( も ちろ ん 救急 車 は 除く ) に 当て る と , Z 
の 回 数 に 見 合っ ただ ボー ナス が 与え られ る の 
T. 

そし て ゲー ム ・ オ ー バ ー の 対象 と な る の 
は 時 間切 れ だ け で , 普通 は 100 秒 で 時 間切 
れ と な る の で す が 。 その 時 点 で スコ ア が 
22.000 点 に 達し て いる L, EXTENDED 
PLAY に な り , 時 間 が 50 秒 延長 る きれ ま す . 

ゲー ム の こつ と し て は , や は り 連 続 撃ち 
を て 5 る だ け 使 う こよ で すね “これ な し に 
高 得点 は 望め ませ ん . 

で は 頑張 っ て 敵 ど も を ブッ ト ば し て くだ 
る い / 


ра 

プロ グラ ム に つい て 
КИКИКИКИНИКИНИНИНІРНЕНІННІЕНІНІНІННІ 
この ゲー ム を 作る 上 で 一 番 苦 労 し た と こ 
ろ と いえ ば , キャ ラク タ の 作成 で す . キャ 
ラク タ が 大 きい 上 , 左右 2 方 向 が ある の で 
スト ベベ り が 多く が な っ て し まい また 

プロ グラ ム 本 体 に つい て は , REM 文 を 
見 て も ら え れ ば わか る と 思う の で 書き ませ 
AD, 主 な 変数 の 説明 を 表 1 に 示し て お きま 
し だ の で , 参考 に 見 て くだ さき さい. また 使用 
キー の 説明 ( 表 2) も 書い て な きま す . 


an 
終わ り に 
人 
ゲー ム 自 体 が 単純 な の で , 割合 飽き ず に 
遊べ る と 思い ます . これ か ら も 。 この 手 の 


占い ゲー ム を 作っ て いく つも り で す 。 な に 
し ろ 家 に は MZ-1200 も あり ます の で , ゲー ム 
の ネタ に は こま り ま せん . 


チキ ショ ウノ タン ク を 狼 っ た の に 


p こんにちは, ALFEERA CY. 突然 で す が , 7 月 号 p136 の 「CRUSHER」 ミ さん の 言っ て いた 。, 
テー の 内 側 に 録音 きれ る の で , R 側 に する の で す ( 肉 側 の 方 が 安定 し て いる の で す ). 
に する と 。 つい 聞 き 入 っ て し ょ う 衝 で あっ た 。 
114 うし まし ょ う 。 生き か える の か な ? 


BAZOOKA 


| タン ク X 座 標 ( バ イク な ども 同じ ) 
| 画面 の 1 列 目 か ら 4 列 目 ま で の 内 容 


MZ ユー ザー の 皆さん , この ゲー ム を 見 
で て もら っ て を ね わか た な よう に 。 WICS は t に 
か く 〈 速い に の です . WICS を 使え ば この 程度 
の ゲー ム な ら 6 誰 に で も 作れ ます . 皆さん も 
この PO に だ くさ ん ブロ グラ ム を 出 そ う で 
は あり ませ A ん か. 

いろ いろ 書き まし だ が , 
だ いと 思い ます .。 で は また 会 
3 参考 文献 
1) "マイ コン ・ ゲ ー ム の 本 | 1]", 工学 社 
2 "WICS BASE プ ログ ラム ょ 集 "。 工学 社 
3 Y.S.K. : BATTLE FORMATION”, 
І/О, "83 年 7 月 号 


この 辺 で 終わ り 
> う 日 まで 


ステ レオ の R 側 に つい て で す が 。 あれ は R が 
P.S. 勉強 し て いる と き に 「ALFEE」 の 曲 を B.G.M 
P.S.2 7 月 号 の p.168 の あま SA. 私 の 生命 線 は 途中 が 切れ て いま す . E 


(ALFEE 聖 人 ) 


1 CO-0:GRAPHO7:COLOR7: TEMPO 6:HISC-O 
10 BXX=2 さ : ВА7Ү=20: BAZF =O: TANKX-4: BIKE 
X24: ЈЕЕРХ=4: RSCX=4: TEK I=$F000 
11 TANKJ=O ВІКЕЈ=0: ЈЕЕРЈ=0: RSCJ-O:EX- 
0: SCR=O: BONUS=0: BONUST-O 
FOR L=0 TO 100: ТЕКІ (1) =0: МЕХТ 
FOR L-$BOOO TO $BOFF:POKE L,O:NEXT 
GOSUBR 11000 
GOSUB 10000 
TIME=O 
“ЖЖЖЖ MAIN XXXX 
GOSUB 1000: "KEY 
GOSUB 2000: -BAZOOKA MOVE 
GOSUB 2500: ^SHOT !! 
БОБОВ 3000: “TANK 
GOSUB 3500: "BIKE 
GOSUB 4000: “JEEP 
GOSUB 4500: "RESCUE 
CO-CO«1:IF CO>1O CD=O 
TLEFT=T IME 
IF TLEFT >100 GOTO 6000 
FOR し =1 TO 100:NEXT:CURSOR 32,10:P 
RINT TLEFT 
210 BDSUB 5500: "BONUS 
500 GOTO 100 
999 “Жжжж KEY ЖЖЖЖ 
1000 KEY=INKEY: RX=0 
1010 IF KEY="Q"END 
1020 IF (KEYs"&")k(BXX«28) BX=1 
1030 IF (KEY="4")*(BXX>2) ВХ=-1 
1035 IF (KEYs" ")Ж(ВХХ>1)%(ВХХ<29) BAZ- 
1 
1050 RETURN 
1999 “Жжжж BAZOOKA MOVE Xxx 
2000 IF MOD(CO,3)»0 RETURN 
2005 SPOKE ВХХ.21," "tSPOKE ВХХ,22." " 
2008 Vl=1:V2=2:VX=BXX: VY221: CH1 2$BOO0:C 
Н2=%В000: CH3-2$4970:GO0SUB 5000 
2010 BXX=BXX+BX 
2020 SPOKE BXX.21.17:SPOKE ВХХ,22,17 
2025 V1-21:U2-2: VX=BXX: VY221: CH1 $0240: C 
H2-$4260:CH3-$4280: GOSUB 5000 
2030 RETURN 


: 2499 “Жжжж SHOT BAZOOKA Xxxx* 


2500 IF RAZ=0 RETURN 

2505 IF BAZFzO ТХ-ВХХ:ВА2Ғт1:ҒОК し =1 TO 
9: SOUNDL %40, 5: NEXT 

2510 SPOKE TX.BAZY.O 


2515 V1z1:V2z1: VXZTX: VYzBAZY: CH12$BO00: 


СН2-ФВООО:СН2-%ВООО: GOSUB 5000 
2520 BAZY-BAZY-1 

2530 SPOKE TX.BAZ2Y,18 

2535 V1z1:V2-1: VX-TX: VY-BAZY: CH1-$BOO00: 
СН2-ФА2АО: CH3-$4200: GOSUB. 5000 

2540 IF BAZY<=1 BAZY-20:B4Z-0:BAZF-0: SP 
ОКЕ TX。1。" ":BONUS-O 

2545 V1z1:V2-1: VX-TX: VY=1: CH12$BOO0: CH2 
= まま BOOOI CHZ-$BOO0:GOSUB 5000 

2550 SRC-SPEEK(TX,BAZY-1) 

2555 IF SRC-19 CCX-JEEPX: CCY=JEEPY: SCR 1 
=50: TEKI (JEEPJ) =0: ЈЕЕРЈ=0: GOSUB. 2800 
2560 IF SRC=2O CCX-BIKEX: ССҮ=ВІКЕҮ: SCR1 
z80: TEKI(BIKEJ) =0: ВІКЕЈ=0: GOSUB 2800 
2570 IF SRC=21 ССХ-ТАМКХ:ССҮ-ТАМКҮ: SCR1 
220: TEKI(TANKJ) 20: TANK J =0: GOSUB. 2800 
2580 IF SRC-22 CCX-RSCX:CCY-16: SCR 1=ー10 
O: RSCJzO:GOSUB 2800 

2700 RETURN 

2800 “%%%% ATARI !! (small sub) ЖЖЖЖ 
2810 BAZ=0: BAZF =0: SPOKE TX,BAZY," " 
2815 Vi=1:V2=1:VX=TX: VY-BAZY: CH12$BOO0: 
СН2-%ВО00: СН2-%ВООО: GOSUB. 5000: BAZY=20 
2820 SCR=SCR+SCR 1 : CURSOR 32,7:PRINT SCR 
2825 Уі-2:У2-2:УХ-ССХ:УҮ-ССҮ-1: СН1-%499 
0: CH22$4990: CH32$4990: GOSUB. 5000 

2826 CURSOR CCX-Z.CCY-2:PRINT SCR1,"O" 
2830 IF 5СКі=-100 FOR I-10 TO 99: SOUNDS 
XI, 2:NEXT: GOTO 2880 

2840 FOR Ісі TO 550 

2850 A-4:IF RND(11)»5 А=5 

2860 OUT 227.4 

2870 NEXT 

2880 CURSOR CCX-2.CCY-2:PRINT " 

OSUB 2400 l 

2885 IF SCR1=-100 BONUS=0:RETURN 

2890 BUNUS=BUNUS+ 1 : ВОМОЅЕ = 1 

2900 RETURN 

2999 “ЖЖЖЖ TANK ЖЖЖЖ 

3OOO IF МОр(С0.8)>0 RETURN 

5010 IF TANKJ-O GOSUB 3300: RETURN 

5020 TANKY-TANKJX4 

3025 FOR Y=0 TO 1 
` 3030 SPOKE ТАМКХ, ТАМКҮ-Ү, О 

5021 SPOKE ТАМКХ+1 , ТАМКҮ-Ү, О 

5022 SPOKE ТАМКХ+2, ТАМКҮ-Ү, O 

5025 NEXT 
2040 V123:U2-22: VXS TANKX: VY TANKY-1: CH1 = 
$BOOO: CH2-2$B000: СН2-%ВООО: GOSUE 5000 
5050 ТАМКХ=ТАМКХ+ТАМКХР 

5060 IF (ТАМКХ<2) «(ТАМКХ>25) TEKI(TANKJ 
) =0: ТАМКЈ=0: ССХ=ТАМКХ : CCY-TANKY: GOSUE 24 
QO: RETURN 

5065 FOR Y-O TO 1 

3070 > SPOKE ТАМКХ.ТАМКҮ-Ү. 21 

2071 ЅРОКЕ ТАМКХ%1.ТАМКҮ-Ү.21 

2072 <РОКЕ ТАМКХ+2, ТАМКҮ-Ү, 21 

2075 NEXT 


EEN AF] SUPER BAZOOKA ソー ス ・ リ スト 


3076 V1z-23:V2-22:UX-TANKX: VY-TANKY-1: СНІ = 
TCH1:CH2-TCH2:CH3-TCH3:GOSUR SOOO 

ЖОВО RETURN 

3299 "am 

5500 IF RND(2)=1 RETURN 

5505 ТАМЕЈ=КМр (3) +1 < 
5510 IF TEKI(TANKJ)-21 TANKJ-O 

5520 R-RND(2):1F К-О ТАМКХР--1: ТАМКХ-26 
:ТСН1І-ФА120:ТСН2-ФА1ВО: TCH32$61EO: GOTO 2 
555 

S330 ТАМКХР-1:ТАМКХ-2:ТСН1І-ФАООО: ТСН2-% 
A060: ТСН<-ФАОСО 

5555 TEKI(TANKJ)-71 

3340 RETURN 

5400 “ЖЖЖЖ CHARACTER CLEAR X*xx 

3410 FOR Y-O TO 1 

3420 SPOKE ССХ, ССҮ-Ү, 0 

3430 SPOKE ССХ+1, ССҮ-Ү, 0 

5440 SPOKE ССХ+2, ССҮ-Ү, O 

5450 МЕХТ 

3460 V123:V2z22: VXzCCX: VYCCY-1: CH12$BROO 
Q: CH2-$BOOO: CH35-$BOO0: GOSUE 5000 

5470 RETURN 

5499 “ЖЖЖЖ BIKE ЖЖЖЖ 

3500 IF МОр(С0.2)>0 RETURN 

5510 IF BIKEJ-O GOSUB 3800: RETURN 

3520 BIKEY-BIKEJX4 

5525 FOR Y-O TO 1 

3530 SFOKE ВІКЕХ.БІКЕУ-Ү,О 

5551 SPOKE ВІКЕХ+1, ВІКЕҮ-Ү, Оо 

5552 SPOKE ВІКЕХ+2, ВІКЕҮ-Ү,0 

5555 NEXT | 

5540 Уі-5:У2-2:УХ-ВІКЕХ: VY-BIKEY-1:CH1-7 
ФВООО:СН2-Ф%ВООО: СН<5-ФВООО: GOSUB 5000 
3550 ВІКЕХ=ВІКЕХ+ВІКЕХР : SHUND55O。 1 

5552 IF.(BIKEX«3) +(ВІКЕХ> 25) TEKI(BIKEJ 
)zO:BIKEJZO: CCX-BIKEX: ССҮ=ВІКЕҮ: GOSUB 54 
ОО: RETURN 

5555 FOR Ү=0 TO 1 

3560 SPOKE ВІКЕХ, ВІКЕҮ-Ү, 20 

5561 SPOKE ВІКЕХ+1, ВІКЕҮ-Ү, 20 

5562 SPOKE ВІКЕХ+2, ВІКЕҮ-Ү, 20 

5565 МЕХТ 

3567 М1=5:У2=2:0Х=ВІКЕХ: VYZBIKEY—-1:CH1-7 
ВСН1:СН2-ВСН2: CH3-BCH3: GOSUE 5000 

3580 RETURN 

5799 “ШЕ 

"800 IF RND(25)»0 RETURN 

3805 BIKEJ=RND (3) +1 

3810 IF TEKI(BIKEJ)=1 BIKEJ-O 

5820 R=RND(2):IF К-О ВІКЕХР=-1: BIKEX=26 
: BCH12$4850: ВСН2=ФАВВО: BCH3=$A910: GOTO 2 
835 

5850 ВІКЕХР=1: ВІКЕХ=2: BCH1=$A7 30: ВСН2-% 
A790: BCH3-2$47FO0 

3835 TEKI(BIKEJ ) =1 

3840 RETURN 

5999 “ЖЖЖЖ JEEP ЖЖЖЖ 

4000 IF МОр(С0,4)>0 RETURN 

4010 IF JEEPJ-O GOSUE 4300: RETURN 

4020 ЈЕЕРҮ=ЈЕЕРЈЖ4 

4025 FOR Y=0 TO 1 

4030 SPOKE JEEPX,JEEPY-Y,O 

4031 SPOKE ЈЕЕРХ+1, ЈЕЕРҮ-Ү, 0 

4052 SPOKE ЈЕЕРХ+2, ЈЕЕРҮ-Ү, Q 

4035 NEXT 

4040 V123:V2-22:UVX-JEEPX: VYJEEPY-1:CH1- 
ФВООО:СН2-ФВООО: CH32-$BOOO: GOSUR 5000 
4050 ЈЕЕРХ=ЈЕЕРХ+ЈЕЕРХР 


4052 IF (JEEPX く < さ )+(JEEPX> 25) TEKI (ЈЕЕРЈ, 


)zO:JEEPJ-O:CCX-JEEPX: CCY-JEEPY: GOSUB 24 
Q0: RETURN 

4055 FOR Y=O TO 1 

4080 SPOKE JEEPX,JEEPY-Y, 19 

4061 SPOKE JEEPX*1,JEEPY-Y, 19 

4062 SPOKE ЈЕЕРХ+2, ЈЕЕРҮ-Ү, 19 

4065 NEXT 

4070 Vi-23:V2-22:UX-JEEPX: VY-JEEPY-1:CH1- 
JCH1:CH2-JCH2:CH3-JCH3:GOSUB 5000 

4080 RETURN 

4096 * 

4299 “Wm 

4300 IF RND(4)=1 RETURN 

4305 JEEFJ=RND( さ )+ 1 

4510 IF ТЕКІ‹ЈЕЕРЈ) =1 JEEPJ=O 

4320 R-RND(2):1F R=O ЈЕЕРХР=-1: JEEPX=26 
: JCH12$0510: JCH2=$A670: JCHZ-$56DO: GOTO 4 
335 

4330 ЈЕЕРХР=1: JEEPX-2: JCH1=$A4F0: JCH2-$ 
ASSO: JCH3=$ASEO 

4335 TEKI(JEEPJ)=1 

4340 RETURN 
'4499 “ЖЖЖЖ RESCUE XXX 

4500 IF МОр(С0,8)>0 RETURN 

4510 IF RSCJ=1 GOTO 4550 

4520 IF RND(5)>0 RETURN . 

4530 IF RND(2) = RSCXP=1:RSCX=2: RSCJ=1: 
RCH1-2$42BO0:RCH2-$A310:RCH2-2$4370:G0TO 45 
50 

4540 RSCXP=ー1 : RSCX=26: RSCJ=1: RCH1 =$A3DO 
: RCH22$4430: RCH3= ま A490 

4550 FOR Y-O TO 1 

4550 SPOKE RSCX.16-Y,O 

4570 SPOKE RSCX*1.16-Y.O 

4580 SPOKE RSCX+2。16-Y。O 

4590 NEXT 

4595 V1-3:V2-22:VX-RSCX: VY=15: CH1 -$8000: 


pio 


СН2-%ВООО:СНЗ-%ВООО: GOSUB 5000 

4600 RSCX-RSCX«*RSCXF 

4610 IF (RSCX«3)*(RSCX»25) RSCJ=0: CCX-R 
5СХ:ССҮ-16: GOSUB 3400: RETURN 

4620 FOR Y=0 TO 1 

4630 SPOKE К5СХ,16-Ү,22 

4640 SPOKE RSCX*1.16-Y.22 

4650 SPOKE RSCX+2, 16-Ү, 22 

4660 NEXT 

4665 V1z3:V2z2: VXZRSCX: VY=15: CH12RCH1:C 
H2-RCH2:CH3-RCH3:GOSUR 5000 

4670 RETURN 

SOOO “ЖЖЖЖ PUTS ЖЖЖЖ 

5010 VRAM-$COOO*VYX640-VXX*2 

5020 VNO-O 

5030 00Т%ЕВ,%9Ғ 

5040 FOR VL-O TO V2k*8-1 

5050 FOR VM-O ТО 91-1 


5060 QUT$F7.1: УКАМ (VM) =CH1 (VNO) 
5070 DUT$F7 , 2: VRAM(VM) =CH2( VNO) 
5080 QUT$F7, 3: УКАМ (УМ) =C ビ H さ ( VNO) 


5085 VND=VND+ 1 

5090 МЕХТ VM 

5100 VRAM=VRAM+BO 

5110 NEXTVL 

5120 OUT$EB,$5F 

5130 RETURN 

5500 ^x**X* BONUS Xxx 

5505 CURSOR 33,14:PRINT BONUS 

5510 IF (MOD(BONUS, 5) <>0) +(EDNUS=O) + (ВО 
NUSF=O) RETURN 

5520 BONUSP-BONUSX10 

5522 CURSOR 5,10:PRINT " BONUS ",BONUSP 
"O pts !! ":BELL:BELL 

5525 REPEAT 

5530 CURSOR 12.10:PRINT BONUSP 

5540 SQUND1000, 1 : BONUSP-BONUSF-- 1 

5550 SCR-SCR«*1 

5560 CURSOR 22,7:PRINT SCR 

5570 UNTIL ВОМОЅР=0 

5580 CURSOR 5,10:РБІМТ " 


5590 BONUSF-O 

5600 RETURN 

5999 "XXX** TIME OVER Жжжж 

6000 ” 

6001 IF «5СК>-2200) Ж(ЕХ=0) GOTO 6004 
6002 ^ 

6003 GOTO 6010 

6004 MUSIC "E1ROE1E1A4":CURSOR 51, 16:РК 
INT "Exten-": CURSOR 35.17:PRINT "ded":C 
URSOR 52.18:РКІМТ "Plau!!":BONUST-1:TLEF 
T=TLEFT-5Q 

6005 Т=100:СС=1: КЕРЕАТ: СС=СС+1:ІЕ CC: = 日 
CC=1 

6006 TzT-1:CURSOR ささ 。10IFRINT T:SOUND10O 
XT.S: COLOR СС, O: UNTIL. T-SO: TIME-SO:EX-1: 
COLOR7, 0: GOTO 500 

6009 ^ GAME-OVER ° 

6010 FOR K2E-O TO 4:CURSOR 9,10:PRINT " 
GAME OVER !"//:MUSIC "-E4" 

6011 CURSOR 9,10:PRINT "^5"—-4 オー バリ ドー "//1 
MUSIC "-44" 

6012 NEXTKZ2E: CURSOR 9,10:РКІМТ " 


6015 IF SCR>HISC HISC=SCR 

6020 GOTO 10 

9999 “Жжжж МАКЕ C.R.T ЖЖЖЖ 
10000 PRINT &11,"&":FOR し =1 TO 29:V1-1:V 
2=1』 VX=L : VY=O 

10010 GOSUB 10500:МЕХТ 

10020 FOR 11-0 TO 20:У1-1:У2-1:УХ-1:УҮті 
L 

10030 GOSUB 10500:VX-229:G08UB 10500:NEXT 
10060 FOR LL-21 TO 23:FOR し =1 TO 29:V1-1 
:V2=1: VX=L: VY=LL 

10070,GOSUB 10500:NEXTL:NEXTLL 

10200 CURSOR 31,3:PRINT "Hi":CURSOR 31,4 
:PRINT ":",HISC, "O" 

10210 CURSOR 51,6:РКІМТ "Score": CURSOR 2 
1,7:РКІМТ ": o" 

10220 CURSOR 51,9:РКІМТ "Time"iCURSDR 31 
S1OfPRINT ": о" 

10225 CURSOR 21,.12:РКІМТ "Bonus": CURSOR 

31,13:PRINT "time" 

10226 CURSOR 31,14:PRINT ": о" 

10230 LINE 496,124,608,124,3,6:LINE 496, 
156, 608,156, 3,6 

10240 CURSOR 31,21:PRINT " SUPER ":CURSO 
R 51,22:РКІМТ "BAZOOKA" 

10250 LINE 496,44, 60B, 44,3, 5:1.1МЕ496, 68, 
608, 68, Z, S:L INE496, 92, 608, 92, Z, Z 

10270 RETURN 

10500 CH1=%B000: CH2=$B000: CHZ=$A970: GOSU 
B 5000: RETURN 

11000 “%ЖЖ% DEMO ЖЖЖЖ 

11010 CLS:PRINT %11,"@ 


; kkkkk SUPER 
BAZOOKA xx*xx*xx"/// 


` 11020 PRINT "-HOW TO PLAY--------------- 


11030 PRINT " о Use key. Г 4 1--BAZOOKA 
left move."/ 
11040 PRINT " 
right move."/ 
11050 FRINT " 
ot BAZOOKA."// 
11060 PRINT " 0 22000 pts is "EXTENDED 


г ё J--BAZOOKA 


[ SPACE 1---һо 


9i0 


リリ スト 1 SUPER BAZOOKA ソー ス ・ リ スト 


PLAY” "77 ert Hy “ж 

11065 PRINT " 0 Continue attack(5,10,15 || 11120 GRAPHD7:V1z23:V3-2:VX-3:VY-16:CH1-$ “ж SUPER ВА20ОКА/2200/2000 

..)is BONUS."/// . A850: CH2-$48BO0: CH2-$4910: GOSUB 5000 1985/2/9 

11070 PRINT "-SCORE TABLE 11120 ViczZ:V2-2:VX-23:VY-18: CH17$6610: CH2 ^* VersionS 3 é (1/6) x 

%/// 7$4670:CH3-2$45DO:GOSUB 5000 “Ж DATE: 1985/1/3( THU. ) x 

11080 PRINT " is BOO pts. 1 11140 V1z3:V2-22:VX-20: VY=16: CH17$65120: CH “¥ Language: MICS Ver/2 x 

200 pts."// i 27$4180: CH3-$41EO0: GOSUB 5000 “k Written bu Y.Sakagami Li 
x 
* 


11090 PRINT " is 500 pts. i 11150 Vi1z3:V2z22:VX-20: VY=18: CH1 =$ASDO: CH i: 

-1000 pts."// . 2-%А420:СН5-%А4490: GOSUE 5000 放す すす すす る 《 す すす すす すす すす すす すす 6 すす すす 19. 
11100 PRINT " Todau^s Hi-score is 11160 CURSOR 25,21:РКІМТ HISC 

Ó ptg. "77 11170 IF ІМКЕҮ-"6" CLS: RETURN 

11110 PRINT " Push (S) кеч is game st || 11180 GOTO 11170 


Add +O +i +2 +3 +4 45 +6 47 +B +9 +A «B +C +D +E +F :Sum A410 79 7E BE 61 TF FE 86 7D DC CO 7E 7E ОЗ SB DC CO :08 


Алооо OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 4420 FE 7F ОЗ 3B 80 61 OO OO 86 O1 OO ЗЕ OO OO FC OO :SE 
A010 OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 A430 00 7C OO OO OO OO OO 7C OO OO OO OO OO FE OO OO :Fé 
AOZO оо оо OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 4440 OO OO ҒО ҒҒ FF FF ҒҒ ОҒ ЗО SE 55 55 55 ЗЕ 10 EE :С4 
AOZO OO OO OO OO OO OO 01 OO OO OO OO 40 02 ОО OO ЗО :73 A450 EF. FF FE 3D 18 EE DF FF FE 7В ОВ АЕ АА АА АА 7A :B4 
.4040 OO 86 F1 80 07 F8 ОО АҒ A OO O3 70 OO 54 28 OO :AO A460 FE FF FF ҒҒ FF 7F FE FF FF FF ҒҒ 7F 7E 80 FF FF ЕЕ 
АО50 OO OO OO 14 60 55 55 55 55 05 ВО АА АА АА АА OO :F5 А470 01 7E ЗЕ 1E ҒҒ ҒҒ 78 7C ІС 33 FE 7Ғ OC S38 ІС ささ :2C 
A050 OO OO OO OO OO OO OO ЕО 07 OO OO OO OO EO 07 OO :СЕ A480 FE 7Ғ CC 58 OO 1E OO OO 78 OO OO OO OO OO OO OO :17 
A070 OO OO OO EO 07 OO OO OO OO OO ОО ОО OO OO OO OO :€7 A490 OO OO OO OO OO OO OO OO OO OO OO ОО ОО ОО OO OO :00 
дово OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 AARO OO OO FO ҒҒ FF FF FF ОҒ FC SF 55 55 55 ЗЕ FC EF :7Е 
добо OO OO OO OO OO OO O1 OO OO OO Се 40 O2 OO OO OO :09 А4ВО EF FF FE 3D FE EF DF FF FE 7B FE АҒ АА АА АА 7А :92 
AOAO 28 80 O1 14 AO OO 28 40 ОА 14 AO OO 28 50 28 63 :86 А4СО FE FF 7F FE FF 7F FE FF TF FE FF 7F 7E 80 07 EO 1:05 
AOBO 18 ОХ Сё 14 60 55 55 55 55 05 ВО АА АА АА АА OO :D6 A4DO O1 7E SE 1E TF FE 78 7C ІС 33 7E 7E CC 538 ІС 353 :ЕА 
AOCO OO Ав 2А OO OO OO OO 54 55 01 OO OO OO AA АА AA :7A АДЕО FE 7F CC 58 OO 1E OO OO 78 OO OO OO OO OO OO OO :17 
AODO АА АА ОО 55 55 55 55 95 BO АА АА 02 OO OO CO FF :D2 4FO ЗО OO OO OO OO OO 40 OO OO 10 OO OO 80 OO OO 10 :10 
AOEO FF 07 00 OO АА АА АА АА АА 2A 55 55 55 55 55 55 :80 || --------------------------------------------------------- 
AOFO АА АА АА АА АА АА 51 55 55 55 C7 40 А2 АА АА 32 :7В Sum 70 ФЕ АЕ BB BE FO 6C ОА АҒ ES А7 ЗЕ DZ 17 7D Cé :EE 


------ — — — — — — — — — — — M — — — +з — — — — — — —À — — — — — — — — — —— — ———— ——À———À—————————— 


A100 28 86 F1 94 А7 FB 28 АҒ ФА 14 АЗ 70 28 56 28 63 :E3 A520 OO OO OO ОО ОО OO ОО ОО ОО ОО OO ОО FO 07 ОО OO :F7 
A110 18 ОЗ Cé 14 60 55 SS 55 55 05 80 АА АА АА АА OO :D6 AS30 ЕО OF 18 OC ОО ОО 30 18 ОС 18 OO OO 18 20 OC 18 :EB 
A120 OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 A540 00 00 18 30 18 OC 00 OO 20 18 FO 07 OO OO EO OF :9А 
A130 OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 ASSO 20 оо OO OO OO OO 40 40 55 05 OO OO 80 AO AA OA :DE 
A140 OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 AS60 OO OO OO 51 OO OO OO OO OO 2А O3 OO OO OO OO OO :7E 
A150 OO OO оо OO OO 00 O4 оо OO OO OQ 40 62 OO O3 00 :49 4570 O3 оо OO OO оо OO оз OO OO OO OO OO 07 OO OO OO OD 
A160 OO ВО F1 80 O7.F8 OO АҒ БА OO 05 70 ОО 56 28 OO :9А 4580 OO OO 07 OO OO OO OO OO 1F OO OO OO FO 07 FF OO :1C 
A170 00 OO 00 14 60 55 55 55 55 05 80 АА АА АА АА OQ :F5 А590 EO ОҒ 98 ОС OO OO 30 19 ЕС 18 OO OO 18 SF 8C 1F :F2 
A180 OO OO OO OO OO OO OO OO OO FO Oš OO OO OO 00 FO :E3 АЗАО ОО OO FB 31 98 OC OO OO 30 19 FO 07 OO OO EO OF :FC 
A190 OZ OO OO OO OO FO O3 оо OO OO OO OO OO OO OO OO :F6 ASBO 50 OO OO OO OO OO 40 40 55 15 OO OO 80 АО АА 1А :FE 
дідо OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO гоо ASCO OO OO OO 51 OO 20 OO OO OO 2А OO 20 ОО OO АА EA :4F 
A1BO OO OO OO OO OO 00 04 65 OO OO OO 40 O2 14 OO OO :BD ASDO OO 40 OO OO 7D 55 OO 54 OO OO ВА AE OO АВ AF OA :2F 
AICO OO BO O1 14 AO OO 28 40 ОА 14 AO OO 28 50 28 63 :5Е ASEO 55 50 00 54 SD SF АА АҒ ОО ЕВ АА EF F1 C7 ОО F4 :58 
А1ро 18 O3 Сё 14 60 55 55 55 55 05 80 АА АА АА АА OO :D6 ASFO ЕЗ 4F 98 8C АҒ АҒ 31 99 FC 18 D7 57 18 さ F 8C 1F :C2 
A1EO 00 OO OO 55 15 00 00 00 ВО AA 2 00 55 55 55 55 :12 || --------------------------------------------------------- 
AiFO 55 OO АА АА АА АА АА 00 OO OO 50 55 55 05 00 OO :А6 Sum SB 44 SF FC 39 ВВ ВЕ 8D 2D FF 1E 42 20 6B 90 80 :66 


A200 FO FF FF 07 АВ АА АА АА АА 2A 54 55 55 55 55 55 :6C A620 80 OO OO OO O2 OO 40 OO OO OO 02 ОО 20 OO OO OO :Е4 
A210 АА АА АА АА АА 2А 04 65 55 55 55 55 62 14 AB АА :02 A630 O1 OO OO OO ОО OO 01 OO OO ОО OO OO ОО OO OO OO :02 
A220 АА АА F1 94 А7 F8 28 4F БА 14 АЗ 70 28 56 28 63 :89 A640 OO OO оо OO OO OO OO OO OO OO OO OO FO 07 OO OO :F7 
A23O 18 05 Cé 14 60 55 55 55 55 05 BO АА АА АА АА OO Dé A650 EO ОҒ 18 OC ОО OO 30 18 ОС 18 OO OO 18 50 ОС 18 :EB 
A240 EO 07 EO 07 AO 02 FO OF ҒО OF ҒО OF ҒО OF AQ OA :16 A660 OO OO 18 30 18 OC OO OO 30 18 FO 07 OO OO EO OF :9А 
A250 F8 1F АВ ОВ FC ZF 50 OC ZO OC FC SF ЕВ ІҒ EO O7 :B3 A670 OO OO OO OO OO 06 OO 00 50 55 01:01 OO OO АВ АА :FF 
A260 00 00 OO OO оо OO 00 оо OO OO оо OO OO 00 OO OO :00 A680 82 00 OO OO 00 00 45 OO OO OO 00 60 2А OO OO OO :51 
4270 ОЗ CO ОЗ CO ОЗ CO OF FO OF ҒО O3 CO ОЗ CO O3 CO :90 8690 OO 60 OO OO OO OO OO 60 OO ОО OO OO OO 70 ОО OO :30 
A280 OO OO OO OO OO OO OO OO 80 O1 80 01 CO O3 OO OO :C5 AGAO OO OO OO 70 OO OO OO OO OO 78 OO ОО FO 07 OO 7F :5Е 
A290 ОЗ CO оз CO оз CO оз CO O3 CO OZ CO 02 CO 02 CO :18 A6BO ЕО OF 98 ОС OO OO ZO 19 FC 18 OO OO 18 SF ВС IF :F2 
A240 CO ОЗ EO 07 EO 07 FO OF FO OF FO OF FO OF EO 07 :74 A6CO OO OO F8 31 98 OC OO OO 30 19 FO 07 OO OO EO OF :FC 
A2BO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 A6DO OO OO OO OO OO 06 OO OO 58 55 01 O1 OO OO AC АА :ОВ 
A2CO OO OO FO FF FF FF FF OF 7C 55 55 55 FD 3F BC BF :2D QA6EO 82 00 OO OO 02 OO 45 OO OO OO O2 OO 2A OO OO OO :F5 
A2DO FF FE FB SF DE BF ҒҒ FD FB 7F АЕ АА АА AA FA 7F :6С A6FO O1 OO FD 55 OO OO 15 ВО EA FA F8 ВА OE ОО 55 75 :56 
А2Е0 FE FF 7Ғ FE FF 7F FE FF TF FE FF 7F 7E 9E 07 EO ҒЗ || ニー ニー ニー ニー ニー ニー ニーーーーーーーーーーーーーーーーーーーー ニ ーー ニーーーーーーーーーーーーーーーーーーーーーー 
A2FO 79 7E BE 61 7F FE 86 7D DC CO 7E 7E O3 3B DC CO :08 Sum 46 7E BS éF 4С 36 40 11 32 96 СЕ 52 92 ED ES AC :95 


АЗОО FE 7F O3 ЗВ BO 61 OO OO Bé 01 OO SF OO OO FC OO :5E А720 OO OO FB 31 98 OC ОО OO ZO 19 FO 07 OO ОО EO OF :FC 
A310 OO OO OO OO ЗЕ OO OO OO OO OO ЗЕ OO OO OO OO OQ :7C 4750 OO OO OO 1F OO OO 00 00 OO SF OO OO OO OO 80 7B :59 
A320 7F ОО FO FF FF FF FF OF 7C 55 55 55 7D OC BC BF :F9 4740 OO OO OO OO OO OO OO OO OO OO OO OO OO ОО BO FF :7F 
ASSO FF FB 7B ОВ DE BF FF FD 7B 18 АЕ АА АА АА 7A 10 :DF A750 00 20 ОО 00 CO FF OF ҒО 02 OO ЗС FO 07 FC 06 00:16 
A340 FE FF FF FF FF 7F FF FF FF FF FF 7F 7E 80 FF FF :EF A760 1C OO FC 78 OC OO OO OO BO O1 00 OO ВО 07 OO O1 :А5 
ASSO O1 7E SE 1E FF FF 78 7C 1C SS FE 7F OC 38 ІС 53 :2С A770 CO 01 FO FF ОЗ OO 9C OF F8 7F ОО OO ЗЕ IF F8 7F :49 
A360 FE 7F CC 38 OO 1E OO OO 78 OO OO OO OO OO OO OO :17 4780 OO OO FE 1F FO ЗЕ OO OO FC OF BO 07 OO OO EO O1 BF 
4370 оо OO OO OO OO оо OO OO OO OO OO OO OO OO OO OO :00 A790 OO OO OO OO OO OO OO 00 OO OO 04 OO OO OO OO OO :04 
A380 OO OO ҒО FF FF FF FF OF 7C 55 55 55 FD SF BC BF :2D А7АО 04 OO OO OO OO 60 04 OO OO OO OO CO O4 ОО 7F OO :АВ 
A390 FF FB FB ЗЕ DE BF FF FD FB 7F AE АА АА АА FA 7F :&С А7ВО OO FE 05 OO 3C OO CO FF F7 O3 FC OC F8 FF 1F OF :25 
АЗАО FE FF 7F- FE FF 7F FE FF 7F FE FF 7F 7E 80 07 EO :р5 A7CO 7C ҒВ FF FF ОҒ 10 CO ІС A2 DD 18 OO ВО 07 14 49 :E8 
АЗВО O1 7E ЗЕ 1E 7F FE 78 7C ІС 33 7E 7E CC 38 ІС ささ :EA А700 FO O1 FO FC EF 05 7C OF 38 7C FO ОЗ CE 1C 58 70 :95 
АЗСО FE 7Ғ CC 38 OO 1E OO OO 78 OO ОО OO OO ОО OO OO :17 А7ЕО OO OO OE ІС FO 3C OO OO さ C ОҒ ВО 07 OO OO EO O1 :09 
Азро OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 А?ҒО OO оо OO OO OO OO OO 00 OO OO OO OO OO OO OO QQ :00 
^ASEO 00 00 FO FF ҒҒ FF FF ОҒ FC ӨР 85 55 55 ЗЕ FC EF 17E || aaa T as terret ares us tn ato tt i nari ی‎ to tm ا کے‎ i Motu 
АЗҒО EF FF FE Зр FE EF DF FF FE 7B FE АҒ АА АА АА 7A :92 Sum 24 FC 99 09 2А 54 86 «С ВА БА 50 А2 18 5А 29 72 :65 


Add +O +1 +2 +3 +4 45 +6 +7 +B +9 +A «B «C +D +E +F :Sum ABIO OO AO O1 00 OO OO OO FO OO OO ЗС ОЗ OO FC ОО ОО :CC 
А400 FE FF 7F FE FF 7F FE FF 7F FE FF 7F 7E 9E 07 EO :F3 A820 9C 07 FC 78 ОО OO OO O3 80 O1 18 OO 80 07 OO O1 :3B 


ーー ーー 
D * (O) p 突然 すみ ませ ん . こう いっ た ハガキ は どう すれ ば 較 る の で し ょ う ( 和 前 に も 同じ 質問 が あっ た よう な 気 が し た けど ). それ と , だれ か STAR 
: (O) LIGHT ADVENTURE PARTII の 解き 方 、 ヒ ント で も いい か ら 教 えて くだ さき さい. P.S. な ぜ か 本 で は あま り PC-1500 が 載っ て いな いよ う 


^ な 所 が する と き が あっ た . (た ん た ん な ん か に 似 て いる わっ た ぬき くん ) 


pio 


リリ スト ク SUPER BAZOOKA マシ ン 語 リス ト 


xxx x xX GCOMPAC BEST 10 xc x x >> x< 


今月 号 よ り BEST10 の 集計 方 法 が , 54 
で の メデ ィ ア 別 の 集計 か ら , 機種 別 の 集計 
に 変更 きれ まし た た. 

そし て 新規 集計 方 法 で の 第 1 位 は , PC- 


SR 版 の 人 気 と 8801 版 の 根 強 る が ガッ チリ 
組み 合い , 機種 別 で は ダン ト ツ の トッ プ で 
+. 
$45 
501, 


これ を 撃退 せん と 狙い を 定め て い 
2 位 の “NOBO" と 3 位 の “ウッ 


前 月 度 の 順位 | 


8801/ тки, SR 用 “ ず ザ ・ コ ユ コクピット” TF. 


コック ビッ トド 


КА” CT. こち ら の ゲー ム b 発売 以来 根 
強い 人 気 を 保ち , 来 月 に も 1 位 の 座 を 奪わ 
ルル よし: て いあ きま.。 : 

どう や ら 6, し ば らく は この 3 本 が 1 位 の 座 
を か け て 激しい デッド ヒー ト を 展開 し て く 
れ そ う で すね . 

552, 今月 の BEST10 で は 2 作 の 新 製品 
が 登場 し ま した. 

を の 1 つ は, 5 位 の PC-9801 シ リー ズ 用 
"ルー サイ ト "です. この ゲー ム は 第 3 回 1/ 


NOBO FM-7 シ リー ズ C, 5"2D, 3.5"2D 
ウッ トイ PC-8801 シ リー ズ 5”2р 
МАСН 7 FM- 7 シリ ー ズ C, 5"2D, 3.5"2D 
ルー サイ ト PC-9801 シ リー ズ 5”2D, 5"2DD, 5"2HD 
ギガ ン テ ス PC-9801 シ リー ズ 5"2DD 

ソニ ッ ク ・ ブ ー ム FM-7 シ リー ズ C, 5"2D 
プレ イク ・ ス ルー PC-6001 シ リー ズ C 
ラク ラン ジュ し レ し Z X1 シ リー ズ C 
ザ ・ コ ッ ク ピ ビット PC-9801 シ リー ズ 5"2DD, 5"2HD 


тоо HIGH 
"ыт 
i" 


чь 


та 


машин» 


ik: : メデ ィ ア の D は ディ スク , QD は クイ ッ ク ・ デ ィ ス ク 版 , C は カセ ッ ト 版 を 示し ます . 


O プ ログ ラム コン テス ト で 優秀 賞 に 煙 い だ 
ес. スト ー リ ー, キャ ラグ BOM 
どれ を みて も な か な か の 作品 で す . 

ま た, 8 位 の PC-6001 シ リー ズ 用 "7v 
イィ イク ・ ス ルー" は , PiO'85 年 8 月 号 で 掲載 
し た 作品 で あり , ひき びる PiO 出 身 の ゲ ー 
ム が 晴れ の 舞台 に 登場 で す . 

この 2 つの ゲー ム が 上 位 に 上 が っ て くる 
Hii, &o ШЕЕ У ЕСЕ 
し みな 新 製品 で す . 


5"2D 
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今 ま で に な いよ うな ,。 シュ ー テ ィング ・ 
ゲー ム を 作っ て み ま し た . 操作 に 慣れ る ま 


で は (操作 に 慣れ て も ?) 難 し いと 思い ます . 


画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| ゲー ム ・ ス ター ト 時 の 音 は , な ん と 
а T в も 不思議 な 音 で すね . (о) 


WICS を ロー ド し て ブロ グラ ム を 入力 し 。 
SOURCE PROGRAM ADRS : $4000 
OBJECT PROGRAM ADRS : $1EOO 
WORKING AREA ADRS : Wege | 
£ 上 2294 し て え を だ きい 。 523419 
ン パ イル で きだ ら 。 テー プ NN 最終 
番地 まで を セー ププ し て か ら 走 ら せ て 〈 く だ る 
L`. 

タイ ミン グ は バッ チ シ だ けど … 


Тазы жатады 


"BUG HUNTING ORIGINAL NO. 27° 
b 1985. 5. = > 
x АН GAME CREATER ҮАМВО. 


10 TEMFO 7:HS=1 000 


20 BG=$C040:FOR I=0 TO 7 STEP 2:BG(I) 


z25500:BG(I-*1)-20:NEXT 
ЗО FOR I8 TO 14 STEP 
(1+1) =0: NEXT 
40 8G(7)-24500: BG (15) 26000 
SO FOR I-O TO 6 POKE ФСООО+І, 0: NEXT 
60 PUSH 31,31,72,71 


70 PUSH 51,51.71,72,119,118,74.74,87. 


81.74,74,066.86.72,72,91,108,72.72 


80 FOR I-O TO 23:POP С:РОКЕ $COO7-4I,.C 


: NEXT 


90 PRINT £&22:CURSOR 15.5:РБІМТ "BUG H 


UNTING" 


100 CURSOR 10,8:РКІМТ " pk ":CURSOR 8,9 


:ЕКІМТ "H A.L. К” 


2: BG(I)-7000: BG 


F1, 22, 聞い て ん の か // 軍事 用 の 半導体 ば っ か 作っ て な いで 
975), 25-7 SU ARUS š ま 5. ^w en ク に チェ ッ ク も せ ず 輸出 し て くる な ん て Z fif 219 281272 / 


走ら せる と タイ トル が 表示 され て , 何 か 
キー を 押す と ゲー ム ・ ス ター ト で す 。 ЖТ 
に ビー ム ・ カ ー( 車 じゃ な いけ ど ), 右上 に 
リバ ー ス ・ カ ー, 一 番 下 に 都市 。 そし て を 
の 上 に バリ ア が 表示 され ます . 

ビー ム ・ カ ー と リバ ー ス ・ カー の 間 を , 
BUG や UFO が 通り ます . 敵 は ビー ム ・ カ 
ー か ら 発 射 し た ビー ム を , リバ バース ・ カ ー に 
ぶつ け , その 増大 し だ た ビーム で し か 倒せ ま 
せん (や や こし いな あぁ )。. 

バリ ア は 敵 の 爆弾 か , 増大 し た ビー ム が 
当たる と 壊れ ます . そし て , 都市 に 爆弾 か 
増大 し だ ビー ム が 当 だ る と 。 ゲー ム ・ オ ォ オー 
ネー と な り ま す 。 まだ た 。 ビー ム ・ カ ー ヵ * 3 
人 台 や られ て も ゲー ム ・ オ ー バ ボー です. 

茂 は 30 秒 ご と に 増え て , 最高 9 匹 に な 5 
id. また , バリ ア は [| SPACE |+ — Tik 
b 直せ, 英 を 20 匹 や っ つつ ける ご と に ババ リア 
が 増え ます . 

な お な , 面 ク リア は あり ませ ん .。 だ ま に は 
AE E 


MEL ILLU LL ТУДЫ MELLE ТЫ ҰТАДЫ ҰЛДЫ УЫ ТАМЫ УДЫ ҚУАДЫ ТАМЫ TO 


MILLE ТИДЫ TTA Ы ЯДА ЯУ ЯТА ҰТА ҰТА PELLI PELLI PELLI PELLI LLL ТО 


ERG ogos UNS E Ж 
の で わか る と 思い ます . それ か ら , 
10 IF (А>0) ж (A ご 10) THEN ~ 
と 書く より も , 
10 IF A70 IF A ご 10 THEN ~ 
| BUG HUNTING ソー ス ・ リ スト mum 


110 CURSOR 27,8:PRINT "Ау" : CURSOR 25, 
9:PRINT "R 2—1 р" 


120 CURSOR 8,1::PRINT "J FIRE 5 
РАСЕ BARRIER" 

130 CURSOR 9,14:PRINT "BUG ........ 10 
Ó PTS." 


140 CURSOR 9,16:PRINT "SUPER BUG .. 20 
О PTS.” 

150 CURSOR 9,18:PRINT "UFO ......-. 7? 
T od Fe Pa 

160 CURSOR 9,20:PRINT "BOMB ....... 3 
0 PTS." 

170 CURSOR 9,22:РКІМТ "MISSILE .... 8 
OQ PTS,” 

180 K2zINKEY: SOUNDRND(100)X100:IF К=0 б 
OTO 180 

190 FOR I=0 TO 16:FOR J=1000-I x50 TO 2 
000-I*100: SOUND.J: NEXT: NEXT 

200 FOR І-250 TO 2000:S0UNDI : NEXT 

210 SOUNDO: SCz0: ЈЕТ=2: BA=3: YKzOt KA-4:L 
=O:BJ1=1:BJ2=1 


p 「PiO パ ー ツ 」 の タイ トル に 描い て ある トラ ンジ スタ の 絵 は ナ ン か 変 で すね ー. 


Oi UP=O FLG=0: СН-О: IB-O: В5=0 


Ok TF=TG+10 


=TMF+10 


:KA=KA+1: MUSIC ""Ci7D"^7E^7D"7C":GOTO 280 
CPRINT "NICE "*MUSID TES OR CUO 


L*1:GOSUR 550 


よく 見 る と 足 が 3 本 ショ ー ト し て いる . 
と エラ イ こ と に な り ま す ョ ヨク 数 年 前 、 米国 の 蓄 社 製 の 3 端子 レギ ュ レ ー タ に こう いう 物 が あっ て アキ バ あ た b で 常々 と 流通 し て た ғ hs 


和 な ユー ザー の こと も 才 を な きる きい. 


と 書い た 方 が, メモ リ の 効率 が 良い よう で 
す ( ス ピー ド は 測っ て いま せん が ). 

まだ , 式 が 成立 し だ ら 61, 不成立 な ら 60. 
(WICS の 場合 ) を 利用 し て も , メモ リ の 効 
к 5 


ТОШ ШК ШК ШК nnm ШК ШШК ШШК ШЕ ШШК ШЕК ШЕК ШЕК К 


КОШКО ШК ШК ШЕК ШК ШЕК ШЕК ШЖ ШК ШК ШЕК ШШЕ ШЕК КЕ 


⑯ ビ ビーム ・ ヵ カー の 横 に ビー ム が きた と き 。, 
ビー ム ・ カ ー を ビー ム に ぶつ ける と た と 。 ビー 
ム を 吸収 し て し まう (増大 し だ た ビーム に 有 
4). 
@ 敵 の UEO も ビー ム を 増大 きせ る 機能 を 
持つ (な お かげ で ゲー ム が 面白 く な っ か た ). 
@ 湖 弾 は いく つか 重なっ て いる こと も ある 
( 気 を 付け まし ょ う ). 


信 回 いろ いろ 工夫 し て み ま し ただ (BGM を 
流し だ た だり, ゲー ム ・ オ ー バ ボー の 表示 , ゲー 
ム の 内 容 じ た い 変 わっ て いる けど …)。 な 
ん と な く 試 作っ ぽい よう で す が 。 これ か ら 
も どん と どん 発展 きせ だ た いと 思い ます . 

3 参考 文献 
"PCG-8000 取 扱 説明 書 "。 HAL 研究 所 


220 


220 PRINT &22:X-0:X1-z37: МК=0: 5Р=0: МӘР- 


2:30 GOSUB 440: GOSUB SSO 
240 MX-$C100: MY=MX+10: MF=MY+10 
250 ТХ=МЕ+10: TY=TX+10: TH=TY+10: TS=TH+1 


260 TMX=TF+10:TMY=TMX+10:TMF=TMY+10: TM 


270 FOR I-O,TO 120:POKE $C100+1,O0:NEXT 
280 TIME=O 

290 GOSUB 240: 50508 490 

300 GOSUB 800:GO0SURB 990 

510 БОБОВ 1120:GOSUR 1460 

520 GOSUB 1690 

550 IF ТІМЕ<50 GOTO 380 

540 TIME-O:SC-SC*100:GOSUB 550:IF КА<9 


350 GET316,10,21,.10,$CO30: CURSOR 16.10 


360 PUT216,10, 21, 10, $CO30: SC-SC*100:L- 


こん な келе う 


/ 電気 的 な 規格 外れ な ら 笑 っ て ご ま 
(草川 直樹 ) 


PO 


270 IF L-5 IF ET1 BJ1-20:GOSUB 1110 
280 IF FLG-1 GOTO 1760 
290 IF FLG=2 GOTO 1720 
400 SOUNDBG(IB):BS-BS-*1:1F В5>11-2%(КА 

-4): BSzO:IB-IB*1:IF IB-16 IB-O 
410 IF ҮК<20 GOTO 430 
420 YK-O:BA-BA«-1:GOSUB 550:MUSIC "7C1*^ 

D7E":IF ВА-5 IF BJ2 BJ2-0:GO0SUB 1110 
450 GOTO 290 
440 FOR 1=0 TO 29:5РОКЕ I,20,67:SFO0KE 

1.21.67:МЕХТ 


450 FOR 1=O TO 39 STEF 10 

460 CURSOR I,22:PRINT " гт — " 

470 CURSOR 1,23:PRINT "4 rH*****," 

480 NEXT 

485 ° MY JET КАКЕ! 

490 SPOKE X,18,75:SPOKEX*1,18,31: SPOKE 


X+2, 18,76 

500 SFOKE X,19,Z1:SFOKFEX+1, 19, 122: SFOK. 
ЕХғ2,19,21 

510 SPOKE X1.2.108: SFOKEX1+1, 2, 74: SPOK 
EX1424,24,91 

520 SPOKE X1, 3, 31: SPOKEX1+1, 5, 120: SPOK 
EX 1+ オ 2 3,31 

S30 RETURN ү 

540 РЦТӘХ.18,Х%2,19,%СООО:РОТ9Х1,2.Х14 
2,3, $COO00: RETURN 

550 CURSOR 0,0:РКІМТ 


"HI-SCORE"; 46, *HS 


"О SCORE O JET",X42, JET 
560 CURSOR O,1:PRINT "BARRIER", 75, ВА, " 
BUG LEVEL ",X2,L*1 


570 CURSOR 22,0:PRINT Z6,+SC:CURSOR 15 
$1:PRINT %3, YE 

580 RETURN 

590 FOR J=0 TO 500: NEXT: RETURN 

500 PFzSPEEK(COCTMXEI 1, TMYCI 1) : RETURN 

10 SPOKETMXLI 1, ТМҮСІ 1, 0: RETURN 

620 SPOKETMXEIJ; TMYCI 1, 9-* CTMFE I 1=2) %62 
: RETURN 

630 SC=SC+SS:MUSIC ""COA":YK-YK*(S8»9) 
:G0SUB 570: 88-0: RETURN 

655 ” MY ЈЕТ UGOKE ! 

640 SPzSP-*1:IF SPX2 RETURN 

650 SF=0: CH=CH+1-( CH=1 ) ж2 

660 UP-UP*1:IF INKEY-100 IF БЕТ="!" 
D 

670 РОКЕ 
:IF K-O IF 

680 РОКЕ 
ІР K=0 IF 

690 POKE 
zIF К=0 IF 

700 РОКЕ 


EN 
$EOOO,$F5:k-PEEK(($EOO1) AND 
Х>О GOSUB 540: Х=Х-1 
ФЕООО,ФЕЗ:К-РЕЕК(%Е001) 
Х<27 GOSUB 540: X=X+1 
ФЕООО.ФҒЕ4:К-РЕЕК(ФЕОО1) 
X1»0 GOSUB 540: Х1Х1-1 
ФЕООО,%Ғ4:К-РЕЕК(ФЕО01) 
:IF K=O IF Х1<27 GOSUB 540:Х1-Х141 

710 POKE $EOO00,$F4:Kk-FEEK($EOO1) 
:IF К=0 GOSUR 740 

720 POKE ФЕО00,%Ғ9:К-РЕЕК(ФЕОО1) 
:IF К=0 БОБОВ 770 : 

750 RETURN 

740 IF UP<3 RETURN | 

750 UP=OI ME=ME+1sTF МК>9 MK=0 

750 MXCMK J=X+1:MY[MK 1217: MF [MK 171: КЕТО 
RN 

770 GOSUB 490:IF EA“1 RETURN 

780 BA-BA-1:FOR I=0 TO 39:SPOKEI,20,67 
:SPOKEIS21.67:MUSIC "TCO™D": NEXT 
790 GOSUB 560: RETURN 
795 ° BEAM UGOKE! 
800 MSP-MSP-«1:IF MSP<3 GOTO 890 
810 MSF=0:FOR I-O TO 10:IF МЕСІ 1=1 GOT 
830 
820 NEXT:GOTO 890 
830 IF ӘРЕЕК(МХГІ1.МҮГІ12<2121 SPOKE М 
ХГІ1.МҮГІ1.0 

840 МҮГІ 1-МҮГІ1-1:ІҒ МҮГІ1<2 МЕСІ 1=0:6 
OTO 820 E 
850 Р=(ЅРЕЕК (МХГІ 1, МҮГСІЈ) ) 
860 IF (P= る 1)+(P=120) MFCI 1=2: SPOKE МХ 


AND 


AND 1 


AND 


AND 


AND 


) : D VD ND ND дар да, 
Ta ант 
Bu ЭЧИ 
À ND 18 ЖАЗ A 
PN im ra Pav. (Q P РУ АГА i @ ТАТ AA 


BUG HUNTING ソー ス ・ リ スト 


1410 FL=OsFOUR І1-ТХГІ1 TO TXCIJ+1:FOR I 
2-ңТҮГІ1 TO ТУҮГІ141 

1420 IF БРЕЕК(11,12)=121 FL=1 

1420 NEXT:NEXT: RETURN 

1440 PUTQSTXEIJ.TYEIJS.TXEIJ*1. ТҮСІ 1+1, $C 
000: RETURN 

1450 РЦИТӘТХГІ1.ТҮГІ1.ТХГІ1%1.ТҮГІ1%1,%С 
007+ (ТЕГІ 1-1) X8* CHX 4: RETURN 


ГІ1.МҮГІ1.121:650Т0 820 
870 IF P=121 GOTO 820 
880 SPOKE МХГІ1.МҮГІ1,.80:650Т0 820 
890 FOR 1=0 TO 10:IF МЕСІ 2=2 GOTO 910 
900 NEXT« RETURN 
910 Р=5РЕЕК(МХГСІ 1, МҮГІЈ):ІҒ Р<>121 MFC 
11-0:5РОКЕМХГІ 1,МҮГІ1,0:650Т70 900 
920 ЅРОКЕМХСІ 1, МҮСІЈ,0 


930 МҮГІ1-МҮГІ 1%1:ІҒ МҮГІ ]=22 FLG-2:GQ0 1455 ° TEKI NO ТАМА 
TO 900 1460 FOR I-O TO 9 
940 F-SPEEK((MXEI 3, МҮГІ 1) 1470 ON ТМЕСІ 1+1 GOSUB 1490,1570,1620 
950 SPOKE МХГ1І1.МҮГІ12,121 1480 NEXT:RETURN 
IF Р-67 SPOKE МХГІ1.МҮГІ12.0:МЕГІ1- 1490 IF 1>20 GOTO 1510 
1500 IF (КМ (50-1 /2)71)+(КА<5) RETURN 


IF (Р<>О)Ж(Р<>ВО) МЕСІ 1=0 1510 К-КМО(КАЭ:ІҒ L<10 IF TF[R1 IF RND( 


GOTO 900 5-(КА>799)21 RETURN 
985 ” ТЕКІ HASSEI ` 1520 IF TFER3J ТМҒГІ1-1%(КМр(52>1) 
990 ON RND(3) GOSUB 1000,1050,1080 1530 IF TFLR]=2 ТМЕСІ ]=1+ (КМ0 (5) =3) 
1000 IF КМО (10) >1 RETURN 1540 IF ТЕСК21=5 TMF[ TI 2=2 
1010 I-RND(KA):IF ТЕСІ 1<>0 RETURN 1550 IF ТМЕСІ 1=2 IF ТҮГК1>8 TMFLI =O 
1020 TFCI ]=1 1560 TMY[I ]=TYFR]+1:TMX[T 1=TX[R 1+RND (2) 
1030 ТҮСІ Ј=КМр (8) +6 —1: TMSEI ]=10: RETURN 
1040 TXCI Ј=0+ (КМО (2) =1) Ж28: ТНГІ 1-1—(TXE 1570 БОБОВ 00:50508 610:IF Р=121 ТМЕГІ 


І 1238) X2: TSEI 120: RETURN 120:88-8:GOTO 630 


1050 IF RND(2O): 1 RETURN 1580 TMSLIJsTMSCIJ«1:IF TMSCI 1%10 GOTO 

1060 I-RND(KA):IF ТҒЕГІ1<>0 RETURN 1610 

1070 TF[I 1=2:GOTO 1030 1590 ТМ5ГІ1-0:ТМҮГІ Ј=ТМҮСІ 1+1: Б050В 600 
1080 IF RND(5O): 1 RETURN :IF P2121 ТМЕГІ,.1-0:55-8:650Т0 620 

1090 I-RND(KA):IF ТЕГІ1<>0 RETURN 1600 IF ТМҮГІ 1=20 ТМЕСІ 2=0: RETURN 

1100 TFLIIJ-3:TYLIJ1-27:GO0TO 1040 1610 GOSUB 620:RETURN 

1110 TET=TET+1s MUSIC ""ESR"C^CE"G9":60TOQ 1620 БОБОВ 600:GOSUB 610:IF Р=121 TMFEI 
550 1-0: SS8-3:GO0TO 630 

1115 ” TEKI UGOKE 1630 IF F-67 GOTO 1660 

1120 FOR I-1 TO 9 1640 TMSLIJ-TMSIIJ*1:IF ТМ5ГІ1<15 GOTO 

1130 ON ТҒГІ1 GOSUR 11604,1210,1310:GOTO 1680 

1150 1650 TMSCI Ј=0: TMYLIJ-TMYLIJ*1:GOSUB 600 
1140 FOR J=0 TO 70:МЕХТ sTF Р-121 ТМЕГІ1-0:56-3:50Т70 650 

1150 NEXT:RETURN 1660 IF F=67 БОБОВ 610:ТМҒГІ 1-0: RETURN 

1160 GOSUE 1410:GO0SUB 1440:IF FL ТЕГІ1- 1670 IF ТМУҮГІ1-22 FLG-2:RETURN 


1680 БОБОВ 620: RETURN 

1685 'SHINDAKANA? 

1690 FOR J=18 TO 19:FOR I-X TO Х+2:Р=8Р 
ЕЕК (І, J) 


0:55=10:50Тт0 630 
1170 TSCI Ј=Т5Г11+1:ІҒ TSCI )3<4-L/2 GOTO 
1200 


1180 TSCI J=0:TXCI J]=TXCI J+THCIJ:IF (TXEI 


1<03%(ТХГІ1>58) ТЕГІ ]=OI RETURN 1700 IF (P=71 )+(F=121 )+(F=9) FLG=1 
1190 GOSUB 1410:IF FL TFLIJ-0:GOSUB 144 1710 NEXT:NEXT*:RETURN 
0:88-10:G0T0 630 1720 FOR I-O TO 100:РОКЕ $EO02;.4:S0UNDI 
1200 GOSUB 1450: RETURN X100 
1210 БОБОВ 1410:GOSUB 1440:IF FL TFLIJ- 1730 GOSUB 590: SPOKE КМр(40)-1.КМр(22%2 
0: S5=20: GOTO 630 1, 107 
1220 TSCI J=TSCI 1+1:IF TSCI 1<%5-L/2 БОТО 1740 FOKE $EO002,5:GOSUB 590: NEXT 
1300 1750 GOTO 1800 
1230 ТӘГІ1-0:ТХГІ1еТХГІІІ1жТНГІ СІР (ТХГІ 1760 CURSOR X,18:PRINT "h" 
1<0)+(ТХГІ 1%38) ТЕГІ 1-0:КЕТОКМ 1770 CURSOR X,19:PRINT "РА" 
1240 БОБОВ 1410:IF FL TFLIJ-0:GOSUR 144 1780 MUSIC "T7B2'74767F^7E-7D^7CBAGFEDC.B.A.. 
0:88-20:G0T0 630 GA FESDZCSOR9" 


1250 IF L>S IF RND(15)=1 GOTO 1280 1790 IF JET»O ЈЕТ=ЈЕТ-1: КА=КА-1Жж (КАХА) : 
1260 IF (>5 GOTO 1300 GOTO 220 

1270 IF (ТХГІ 1<>Х) + (КМО (50-(КА-4)ж2)>1) 1800 FOR I-O TO 8 

GOTO 1300 1810 Р=5РЕЕК (0, 12) :ЕҒОК J=0 TO 22-1 

1280 R-RND(10)-1:IF ТМЕСК2<>0 GOTO 1300 1820 SPOKE Ј,12,Р 

1290 TMFLR]=1:TMXER]=TX[I 1*RND(2) -1: TMY 1830 СН= (1=0) ж18+(1=1) ж5+(1=2) X22*(I72) 


LR]=TYEI J: TMSER 1-10 %15+(1=5) ж5+(1=6)ж15+(1=7)+(1=В8)%ж7 


1300 GOSUB 1450: RETURN 1840 Р=8РЕЕК (7+1, 12) 
1210 GOSUB 1410:GOSUB 1440:IF FL ТЕГІ 1= 1850 SPOKE J*1,12,CH:MUSIC "TCO" 
O: SS-RND(CS)X10:GOTO 530 1860 NEXT:NEXT:IF HS<SC HS-SC 
1320 TSCI ]=TSL TI ]+1sTF TSEIIJ3«6-L GOTO 14 1870 GOSUE 550: MUSIC "КККК": БОТО 90 
O0 1880 END 
1330 TSEIJzO: TXEIJ-TXELIJ«THEIJ:IF (ТХГІ 1890 SOUNDBG(I):I-I-*1:IF I-16 I-O 
140) +(ТХГІ 2258) ТЕСІ ]=0: КЕТОКМ 1900 FOR J-O ТО 1000: МЕХТ: БОТО 1890 
1240 GOSUB 1410:IF FL ТЕГІ ]=0: GOSUE 144 10000 9999999998999999999:999999%39%9” 
0:55-КМр(52%10:60Т0 630 10010 * 5 
1350 IF L>5 IF RND(9)=1 GOTO 1580 10020 - GOKUROSAN * 
1360 IF L»5 БОТО 1400 10030 ° 9 
1370 IF RND(ZS-(KA-4)*#2)>1 GOTO 1400 10040 gib: оаа а рае, ç 
1380 R-RND(10)-1:IF ТМҒГК1<>0 GOTO 1400 


1390 ТМЕСК1=2: TMXERJETXEI 1*RND(2) —1: TMY 
[LR]=TYLI 1: ТМЕК 1-10 
1400 GOSUB 1450: RETURN 
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EPLIS II の 改造 に つい 


PiO 7 月 号 の ZEPLISII. ど うだ っ だ で 
し ょ うか ? 無駄 どら け の 長い プロ グラ ム 
に も か か わら ず 打 ち 込 ん で くれ た 方 , どう 
も あり が と う ご ざ いま す . 

と ころ で , あの ゲー ム は 慣れ て くる と 簡 
単に 最終 母艦 の と ころ に 行け る よう に な り 
š+, そう いう 人 だ ちの だめ に 作っ だ の が 


Ld ns a 


この リス ト で す .。 C290H か ら 6C2CFH ま で 
е, リス ト の 通り 変更 し て く 〈 く だ さい . 

この 改造 を する と , 敵 の 攻撃 が 前 より 激 
し くく なり,。 と て も 上 難しく な り ま す の で 試し 
て みて くだ る さい (作者 の 私 で も 最後 まで 行 
け ま せ た で し だ た … り 。 


119 


VIC-1001-viIC-1?11M 


BASIC 十 (マシ ン 語 ) 。 


ES : BEI 


7 
$ 


шш з 


爆弾 が た くさ ん つま っ て いる 倉庫 で , あ 
な た は 危険 物 回 収 の アル バイ ト に 精 を 出し 
ます . と ころ が , モン スタ ー が 邪魔 し て 思 
う よ う に 作業 が は か どり ませ ん . そこ で あ 
な た は …. 

圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


パズル っ ぽく て な か な か 面白 いで す | 
&. で も [XI[VIINI キ ー ょ より も [XI[C] 
[VI| な と の 方 が ゲー ム が し や すい と 思 
いま す 。 (V) 


入力 方 法 


リス ト を 見 て わか る と 思い ます が ,。 この 
ゲー ム は VIC-1211M が 必要 で す 。 

i Ў, VIC-1211M を セッ ト し 。 
RELEASE し ます . そし て リス ト 1, 2 
を 順に 入力 ,。 セー ジグ し て 〈 く だるい. 

実行 する と き は VIC-1211M を セット, 
RELEASE し て リス ト 1 を を ロード, RUN 


19 PRINTC 
MINUTE. 。 
20 RD»130:DD»12:SU»4440: Q«RDWDD^S!! 
30 FOR Ie0«200w2T0Q«569:RERDR$:GOSUB 300 
Q9: POKEI,D:NEXT - 
40 FOR I«04656T00*1029:RERDR$:GOSUB 3000 
: POKEI,D:NEXT 
50 FOR I90*«1072T0041152:RERDR$:GOSUB 300 
@:POKEI,D:NEXT 
60 FOR I=Q/10+31T0Q0/10+35:RERDñ$:GOSUB 3 
000 :POKEI,D:NEXT 
70 FOR 19041168T00411694511:RERDR$ : GOSUB 
3000 : PDKE I , D: NEXT 
80 PRINTCHR$(147):LOCRTE2, 8: PRINT"Q.K. ! ! 
" :POKE631, 131: POKE198, 1 
90 END 
100 DATA R9,00,8T, FS, 1B, RE,F9,1B 
110 DATA BD,66,1C,C9,02,F0, 2D, BD 
120 DATA 60,1C,8D,F2, 1B, BD, 63, 1C 
130 DATA 8D,F3, 1B, BD, 69, 10, 8D, FS 
140 DATA 1B,BD,6C, 1C, 8D, F6, 1B, RE 
150 DATA F2,1B,RC,F3,1B, 20. RO, 1B 
160 DATA 82,00,8D,F5$,18,81,10,RD 
170 DATA F6,18,81,12, RD, F9, 1B, CD 
180 DATA FB,1B,D0,01,60, EE, F9,1B 
190 DATA 4C,05, 19, ER, ER, ER, ER, ER 
200 DATA R9,00,8D,F9, 1B, RE, F9,1B 
210 DATA BD,66,1C,C9,02,FQ0, 1F BD 
220 DATA 60,1C,8D,F2,1B, BD, 63, 1C 
230 DATA 8D,F3,1B,RE,F2, 1B, RC. F3 
(240 DATA 1B,20,RQ,198,R2,00, R9, 0R 
250 DATA 81,10,89,0F,81,12, RD, F9 


HR$C147):LOCRTE2, S: PRINT"MRIT A 


すれ ば 自動 的 に リス ト 2 が ロー ド さ れ ま す . 


な お リス ト 1 は 1 バイ ト ご と に POKEB し て 
いる の て で, リス ト 2 を ロー ド す る まで 1 分 
ほど か か り ま す .- 


Р]. |. ] で 上 下 左右 に 移動 , [X] で 
壁 や 爆弾 を 破壊 , |V| で キッ ク , [NI で プッ 
ジュ し ます . そし て 黄色 い 爆 弾 を 左上 に あ 
る ドア まで 運ん で くだ さい .。 4 つ す べ て ド 
アァ から 運び 出す と 面 ク リア で , 次 の 面 へ と 
進み ます . 

gis, モン スタ ー に 捕まる と 即 ゲ ー ム ・ 
ォ ー バ ー で す . | | キー を 押し て 再 ス タ 
SRECI T oO 


プログ ラム の 説明 


8 <16 ド ッ ト の キャ ラク タ ・ モ ー ド に す 
る と , 文字 の 表示 が で き な い と いう 制約 が 
ある た だ ため , 画面 に 表示 する 文字 は すべ て リ 
スト 〕) な 2 デー タ も し て 入 れ ぜ で な る きま し か た. 


260 DATA 1B,CD,FB,1B, DO, 01,60, EE 
270 DATA F9, 18, 4C, 95, 19, ER, ER, ER 
280 DATA EA. EA. EA, EA. EA, EA, EA, EA 
290 DATA ERA. EA, EA, EA, EA, ER, EA, EA 
300 DATA 20,00, 19,20. AC, 18, 20, 50 
310 DATA 19,60:КЕМ00,00,00,00,00 
320 DATA RD,F8,1B,CD,F3,1B,D0,01 
330 DATA 69,99, 1R,EE,F3, 1B, RE, F2 
340 DATA 1B,RC,F3,1B,20,R0, 15, R2 
350 DATA 00,81,10,09,07,00,03,СЕ 
360 DATA F3,1B,4C, 3C, 18, CE,F3,1B 
370 DATA RE,F2,1B,RC,F3, 1B, 20, AQ 
380 DATA 1В8,82,00,81,10,09,07,70 
390 DATA Q3,EE,F3, 1B, RE, F2, 1B, RC 
400 DATA ҒЗ, 1В, 20,80, 18, R2, 00, R1 
410 DATA 19,80,F5, 15, 81, 12, 8D, F6 
420 DATA 1B,60,ER, ER, ER, RD, F2, 1B 
430 DATA CD,F7,1B,00,01,60, BO, 1A 
440 DATA EE,F2, 18,RE,F2, 1B, AC,F3 
450 DATA 18,20,80,18,82,00,81,10 
460 DATA C9,07,D0,03,CE, F2, 1B, 4C 
470 DATA 91,1R,CE,F2, 1B, RE, F2, 1B 
480 DATA RC,F3,18,20, R0, 15, R2, 00 
490 DATA 91,10,C9,07,D00,03, EE, F2 
500 DATA 1B,RE,F2,1B,RC,F3, 1B, 20 
510 DATA 80,18,82,00,81,10,80,Ғ5 
520 DATA 1B,R1,12,8D,F6,1B,60, ER 
530 DATA CR,ER,ER,ER,R9,00,8D, F9 
540 DATA 1B,RE,F9,1B, BD, 60, 1C, 8D 
550 DATA F2,1B,BD,63,1C, 8D, F3, 1B 
560 DATA BD,66,1C,8D,F4, 1B, BD, 69 
570 DATA 1C,80,F5,19,8D,6C,1C, 8D 


今 の まま の マイ コン ・ プ ー ム は , そう 長 
〈 は 続か な いと 思い ます 。 し か し / コン 
ビ ピュー タ が 社会 か ら 消 えん 去っ て し まう こと 
は な いと 上 思う の で し つこ く コ ンピュータ 
を 続け て いき だ いと 思い ます . 

See you again / 

OSE SCA 
"マル チ ・ カ ラー の 使い 方 ", I/O, %5 年 10 


月 号 


プロ グラ ム 入 力 時 の 注意 
BASIC の リス ト 中 で 次 の よう に 1 印 の 部 分 
は , 全て 反転 文字 の 所 で す . 
18 PRINT "«S08J IR- EY terT! 
1111111111111111? 
下 の よ うに 反転 文字 で 入力 し て くだ さい . 
10 PRINT "DOC DOIN ҒЫТ" 


раче DANGER ZONE キャ ラク タ 定 義 プ ログ 5. Was 


580 ТАТА F6,1B,RD,F4,1B,C9,02, DO 
590 DATA 24,RD,FR,1B,CD,F9,19,00 
600 DATA 19,R89,00,8D,F4, 1B, R9, 0A 
610 DATA 8D,F2,1B,R9,09,8D,F3,1B 
620 DATA R9,20,8D,F5, 1B, R9, 00, 8D 
630 DATA F6,1B,4C,46, 1B, ER, ER, ER 
640 DATA EA, EA, EA, EA EA, ER, ER, ER 
650 DATA EA, EA, EA, EA, ER, ER, EA, EA 
660 DATA ER,ER,RD,F4, 1B. FO, 09, 20 
670 DATA 00,18,20,55,18,4С,26,1В 
680 DATA 20,55,18,20,00,18,ЕЯ,ЕН 
690 DATA EA, EA. EA, EA, ER, ER, ER, ER 
700 DATA ER,ER,ER,ER,ER,ER,ER,ER | 
710 DATA ER,RD,FR,1B,CD,F9,1B,DO ` 
720 DATA 85,89,01,4D,F4, 1B, RE,F9 
730 DATA 1B,RT,F2,1B,97,60, 1C, RD 
740 DATA F3,18,9D,63, 1C, RD, F4, 1B 
750 DATA 90,66, 1C, RD,F5, 1B, 90,69 
760 DATA 1C,RD,F6, 1B, 9D, 6C, 1C, RD 
770 DATA F9,1B,CD,FB, 1B, D0, 01,60 
780 DATA EE,F9,1B, 4C, B1, 1A:REMQO 
790 DATA Я9,00,85,10,85,12,89,1Е 
800 DATA 85,11,89,96,85,13,88,18 
810 DATA 65,10,85,10,89,00,65,11 
820 DATA 85,11,88,18,65,12,85,12 
830 DRTR Р9,00,65,13,85,13,89,00 
840 DATA SD,F1,1B,CC,F1,1B,D0,01 
858 DATA 60,ЕЕ,Ғ1,1В,89,16,18,65 
860 DATA 10,85,10,89,00,65,11,985 
670 DATA 11,89,16,18,65,12,85,12 
880 DATA 89,00,65,13,85,13,4С,СВ 
890 DATA 18,4C,4F,41,44,0D 


ぁ 今 まで パソ コン DJ に つい て 書い た 人 が いな か っ た よう な 気 が す る の で 甘 こ うと 思い ます . まず , 前 DJ の ロク サー ナ さ ん へ . 空手 が 趣味 と 
計っ て いま し な た だ が, 段 か 級 を 持っ て いる の で すか ? 僕 も 空手 を や っ て いて 。 小学 校 6 年 生 に 3 級 を 取り まし た が 。 中 学 の 3 年 間 は サッ カー に 熱 
申し て いた (る ) の で 3 級 の まま で す .' そ し て , 新 DJ の クリ ステ ィ ン る ん と カレ ン さ る ん へ . 2 人 は 友達 な の で すか . SOU, クリ ー プ ブランド は 
わか り ま すか が 。 マク リー ン と いう の は 日 本 だ と な に に あたる も の で ,。 どう いう 地 で , な に か 有名 な も の が ある の で すか ? つ いで に 編集 部 へ . 


900 DATA 80,24,01,46,24, 08, 59, BC 
919 DATA 08,59,08,01,46,01,08,80 
920 DATA 00,00,00, 3C, FF, EB, AA, 55 
930 DATA 55, AA,EB,FF , 3C, 82, 00, 00 
940 DATA 00,0C,09, 10, 3E, 73:79:79 
950 DATA 7F,79,7F,3E, 1C, 00, 00, 00 
960 DATA 55,55,69,69,69,69,55, 55 
970 DATA 55,55,55,55,55,55,55,55 
980 DATA 00,190,908, 1C, 35, 73, 79,79 
990 DATA 7F,79,7F,3E, 1C, 00, 00, 00 
1000 DATA Q0,00,00, 00,00, 00, 00, 00 
1110 DATA @@, 02, 00, 00, 00, 00, 00, 00 
1120 DATA 00,00,00, 00,00, 00, 00, 00 
1130 DATA 00, 00,00,00,00, 00, 00,00 
1140 DATA Q0, DF, DF, DF, DF, DF, DF, DF 
1150 DATA 00,ҒВ,ҒВ,ҒВ,ҒВ,ҒВ,ҒВ,ҒВ 
1160 DATA FB,FB,FB,03,03, 03, E3, E3 
1170 DATA E3,03,03, 03, FB, FB, FB, 00 
1180 DATA FC,FC,FF,8F,87,87,8F,FF 
1190 DATA FE,FE,B8,9C,8E,87, 87, 00 
1200 DATA 00,64,64,20,64, 64, R8, B8 
1210 DATA FC,EC, R8, R8, 20, R6, 88,00 
1220 DATA EO, D0,C8, C4, C2, C2, C2, C2 
1230 DATA C2,C2,C2, C2, C4, C8, DO, EO 
1240 DRTR 07,08,13,23,43,43,43,43 
1250 DATA 43,43,43,43,23,13, 08,07 


18 POKE36865, 200 : 00936867 : POKEQQ, PEEK (QQ 
*0R1 :POKEQQ«2, 255: POKEQQ*11,70:POKEQO*12 


‚9 
20 С3=00/10-186. 7: K8$2" WG" :L$2"71 ":CD276 


T. T 
8048*22:LJ»0:WI$2"2(Y7" :WM$2" NHI" :LQ«35 
00ж2 
30 РОКЕСЗЖ3+163,0:0=50 :К2=283:02»23:03=5 
1::SD922:RESTORE:L2915:2222 
40 CP=6502:2X=58 
50 POKED2-4,0 
60 FORIsQTO2 
70 POKELQ4270*I,2:POKELQ*264*1,0 
80 РОКЕ( 0%267%1,0 
90 NEXT :PC=CP+ZX 
110 X29:Y»4:H»0:]21:C120:C220:2127680422 
549-22: 22930720: POKE7163, 2 
120 GOSUR1500:GOSUB800:GO0SUB 730 
130 FH=INT(RND(1)85)+1:IFR0=?8THEN190 
140 IF FHX»STHEN GOSUB 800 
150 ІҒ00<4 THEN 00-00%1 
160 ІҒ0023 THEN 00-1 
180 POKECD, 10466: POKECD430720, 1 
190 РОКЕ00%12,9:РОКЕ00%11,70 
200 POKELQ*156*INT(RNDCI)W9)41,X:POKELO^ 
158* INT(RNDC12NA4) 1, V 
210 POKELQ+162, ІМТ(КМ0(12Ж302%1:5Ү5РС 
220 ЕРІзРЕЕК(7680%ХғҮй22) 

230 IFEP1=190nREP1=110REP1=120REP1=13THEN 
2000 

240 : 

300 KxPEEK(197) :K2sPEEK(145) : IFK=64THEN1 
3e 


IFKm37THENC2=1 :С190 : 2222 
IFKs22THENC1m1 :C290:2»1 
IFK213THENC2»-1:C120:22-22 
IFKs21THENC1s-1:C2»0:2»-1 
IFK2»251THEN 6000 
IFK2=239THENIO=1 : GOTO 3200 
IFK2»247THENIOsQ:GOTO 3200 
{1=PEEK(Z1+Z) 
IFI12320RI125THENGOSUB3000 : XsX+C1 : Y» 

Ү%С2:21ш21%2 

390 РОКЕ00%11,70:РОКЕ 21,1 :РОКЕ21+22,31 

500: 


560 : 

700 GOTO 130 — 

730 FOR 2М=17070230 STEPS:FOR M2«230T017 
9 STEP-5:S0UND(0, MZ, ZM, 0, 15) :NEXT: NEXT 


735 005031000: 


750 TEMPOS:MUSIC2, "+C4+01+CIHAA#A+CIGIAH 
RSR38ñR+CS+C4+D1+C38RR8R+C565+CR3F6" : RETU 
RN 
760 TEMPOS :MUSIC3, "F3FSG3RSFD3CSC?R3FFS0 
3RSFD3CSC?RSFFSG3RSFG9D3DSF 3G5ED3C9" : RET 
URN 


780 TEMPO3:MUSICI1, "R1D4ROD3ROD1RODSF4EOR 
QE4DOROD4#C1D7" : RETURN 

790 FORXG=16T09STEP-1 : SOUND(CO, 0, 0, 163, XG 
) ‘NEXT :GOSUB 1000 

795 RETURN 

800 SReINT(RNDC12NAD 1 

810 IFSBs1THENOTs-1:GOTO 850 

820 IFSR=2THENGT= 1:0070 850 

се IFSB=3THENGT=22: GOTO 850 


PiO 


リス ト 1 DANGER ZONE キャ ラク タ 定 義 プ ログ ラム 


1260 DRTR FF,81,81,81,81,81,81,81 
1270 DRTR 81,81,81,81,81,81,81,FF 
1280 DATA 3C,3C, 0C, 0C, 0C, QC, QC, OC 
1290 DATA 0C,9C, 0C, 0C, 0C, OC, OC, OC 
1300 DATA 3F,3F,93,93, 03,03,03,3Ғ 
1310 DATA 3F, 30,30, 30. 30,30, ЗҒ, ЭҒ 
1320 DATA ЭҒ,3Ғ,03,03,03,03,03,3Ғ 
1330 DATA 3F,03,03,03,03,03, 3F 3F 
1340 DATA 00,00,00,00,FC, C6, C6, C6 
6 


1350 DATA F8,C6,C6,C6, C6, C6, FE, Q0 
1360 DATA 00,00,00,00,7C, C6, C6, C6 
1370 DATA C6,C6,C6,C6, C6, C6, 7C, 00 
1380 DATA 00,00,00,00,С3,Е?,Е?,Е? 


1390 DATA DR. DB, DB. C3. C3 C3. C3, 80 
1400 DATA 00,00,00,00,7Е,63,63,63 
1410 DATA 63,7С,63,63,63,63,7Ғ,00 
1420 DATA 00,00,00,00,78,45,45,45 
1430 DATA 45,45,79,51,49,45,44,00 
1440 NATA 00,00,00,00,Е4,14,14,14 
1450 DATA 14,14,14,14,14,14, E3, 00 
1460 DATA 00,00,00,00,51,59,59,55 
1470 DATA 55,55,55,55,53,53,91,00 
1480 DATA 00,00,00,00,78,44,44,00 
1490 DATA 00,00,00,00,00,00,00,00 
1500 DATA 00,00,00,00,78,44,44,44 
1510 DRTR 44,44,44,44,44,44,78,00 


850 X1=PEEK(CD+GT) 
860 IF X1-7 OR X1=3 ORX1=4 OR X1=2 THEN 


RETURN 
870 POKE CD,32:POKE CD+39729, 9 :CD=CD+GT 
880 : 


890 RETURN 
900 FORR93»1T01500:NEXT:GOTO 10 
1000 SOUND(O, 0, 0,0, Q) : RETURN 
1500 Ө ыл 
; £ 
1510 ҒОРТТе0Т70506:РКІМТ(%; : NEXT 
1520 FORTT=9T01?:LOCRTE TT,Q:PRINTKR$;:L 
OCRTE TT,12:PRINTKR$:NEXT 
1530 : 
1540 FORTT=1T012:LOCRTE Q,TT:PRINTKR$SPC 
(16)KR$:NEXT 
1550 КО«К0%1:10СЯТЕ 18,2: E (еу (0 


CRTE 18,4:PRINT SM LOCRTE 19, S: PRIN 


TCHR$CRO) 
1560 UPsUP+1 : SETC8: LOCATE 18,8:PRINTHI$: 
LOCATE 18,9:PRINTWM$ : IFUP>3THENGOSUB7S9 : 
60705 
1570 GOSUB3300:G0SUB2600:GOSUB 1600:РОКЕ 
36865,18 
1590 RETURN 
1600 POKE646,27:PRINT"SQJC" : RETURN 
MM 
1700 HGOs»0 
1705 IFY»10RNDZ»22THENHQ»1 : RETURN 
1710 IFY<2RNDZ=-22THENHQ=1 : RETURN 
1720 IFX»15RNDZ»1 THENHQ=1 : RETURN 
1738 IFX く <2RNTIZ=-1THENHQ=1 : RETURN 
1740 HQ=9:RETURN 
2000 FORGH=1 T030 : SOUND( 163, 0,0, 163, 16-GH 
/2) :GO0SUP1000 
2010 POKE 21,0:POKE Z1+22, GH: NEXT : GOSUB 
5010:GO0SUB 5030 
2020 IFPEEK(197) く >39 GOTO 2020 
2030 CLR:RUN 
2600 005081600 :РОКЕ21, 1 :РОКЕ21+22,31 :FOR 
61=1TO29 
2610 H1sSINT(RNDC32N15241:H22 INTCRNDC3)W1 


9)+1 
. 2615 LK=PEEK(7725+H1+H2W22) : IFLK く >32THEN 


2610 

2620 IFLK»32THENPOKE77254H1«H2W22 , 4 : POKE 
Z2+7725+H1+H2※22, 5 

2630 NEXT:GOSUB 6500 

2640 RETURN 

3000 РОКЕ21,5 

3110 RETURN 

3200 С1=21+2:СО=РЕЕКССІ) : CRmS : IFCOS7THEN 
GO0SUB1799 : CR=3 

3201 IFHQ=1THEN 200 

3202 IFCO*320RCOSTHEN 200 

3209 IFCO=2THENCR=7 

3219 CIsCI*2:S0UND(CO, 0,90, 230, 15) 

3220 PsPEEK(CI): IFCR9S?7RNDPS3THENL JsL J41 : 
GOSUB?90: SD»SD-1:LOCRTE SD,3:PRINT"vB" 


^ 
3224 IFPsZ0RP=40RP=20RP=190RP=1 10RP=12OR 
P»13THENGOSUB1600:G0SUB1000:GOTO 200 — — 
3230 POKECI-2,5:POKECI,CO:POKECI*22,CR:I 


 FLJIs201-1THENGOSUB 5010:0051/8 5969:GOTO 


900 


1520 DRTR 00,FE,FF,?F,71,70,7?0,7?0- 
1530 DATA 70,70,70,71,7Ғ,ҒҒ,ҒЕ,00 
1540 DRTR 00,03,87,8F,DE, DC, DC, DC 
1550 DATA DF,DF,DF,DC,9C,9C, 1C, 00 
1560 NATA 900,C3, E3, F3, 7B, 38, 3B, 3B 
1570 DATA FR,FRB,FR,3B, ЭВ, 35, 35, 00 
1580 DATA 00,87,87,87,87,87,С7,Е? 

1590 DATA F7,8F,9F,8F,87,87,87,00 

1600 DATA 3F,3F,FF,EQ, EQ, EQ, E7, E? 

1610 DATA EZ,E9,7F,7F, 1F, 00,00, 00 

1620 DATA QF,EF,EF,EE, OE, OE, EF, EF 

1639 DATA EF,EE,EE, EE, EF, EF, EF, 28 

3000 nsR8SCCLEF7$CR$,15) 

3100 GOSUR 3S88:nHzD 

3200 nzsRSCCORIGHT$CRÉ, 1 ) ) 

3300 GOSUR 2500 :Л=0нж16+] 

3400 RETURN 

2500 IF П<58ТНЕМ Dzn-48 

3600 IF T1557 THENT=D-5S 

3700 RETURN 

32800 POKE36869,255:POKE36867 , PEEK (36867) 
081 


ima リスト DANGER ZONE メイ ン BASIC リ スト ае 


3248 ІҒІ0«1ТНЕМ00981000:0070200 

3250 IFIOs6THEN 3210 

3300 FORI2»1T069:RERDRS,RG:LOCRTE R8, A9- 

2:PRINT KR$:NEXT 

5000 RETURN : 

5010 FOR X5»1T012:FORX621T017:LOCRTEX6, X 

5: PRINTKR$ : NEXT : NEXT : RETURN 

5020 : 

5030 FORM9w2TO? : SETCMS, 1, 2: LOCRTE2, 2: РКІ 

NT"6661071000G" :LOCRTE 2,3:PRINT"611100 
FTT i TTT 

1626210" 

тт? 

5040 LOCATE 2,4:РЮІМТ"0002000010220":10С 


422.“ 
ATE 2,5:PRINT"8111010070110" 
Mtt tM 
5050 LOCATE 2,6:PRINT"060101101060" : FORM 
7%“. 


Өш17050:МЕХТ:МЕХТ:ҒОКХЭв17050:МЕХТ 

5051 GOSUB?80:RETURN 

5060 ҒОЮМ9«2707:5ЕТСМ9,1,2:10СЯТЕ2,2:РЮІ 

МТ"100021022":10С8ТЕ2,3:РКІМТ"0222010120 
T MM ++ 1 


5070 LOCATE 2,4:РРІМТ"012102010" 
MM 人 
5080 LOCATE 2,5:PRINT"03220206" :LOCRTE 2 


9e 

,6:РКІНТ"012201020":10С8ТЕ 2,7: ERU s 

SM qr 
0110120" . 

MOM 

5090 FORMSs1TOSO:NEXT:NEXT:FOR X9»1T050: 
NEXT : GOSUR?6Q : RETURN 
6000 CIw2142:COsPEEKCCIO: IFCOm40RCOm7THE 
N6905 
6001 GOTO 200 
6005 IFCO»7THENGOSUP1 700 
6006 IFHQ»1THEN200 
6119 GOSUB?90:FORZ25s1T025 
6120 РОКЕСІ,0:РОКЕСІ%22,25:МЕХТ 
6130 РОКЕСІ,5:РОКЕСІ%22,0:0070 200 
6500 FIRG1m1TO4 
6510 H6=INT(RND(3)189)+1:H?=INT(RND(5288) 
+1: KLePEEK (77084 H6*H7W22) : IFKL く >32THEN65 
1e 
6515 ІҒКІ «(7680%10%22%92ТНЕМ6510 
6520 ІҒКІ «З32ТНЕМРОКЕ?725%Н6%Н?%Ж22,2:РОКЕ 
22%7725%Н6%Н7%22,7 
6530 МЕХТ 
6540 RETURN 
10000 DRTR3,3,3,6,3,7,3,8,3,14,3,15,3,16 
,4,3,4,4,4,7,4,8,4,11,4,12,5,6,5,7,5,10, 
5,11 
11110 DRTR4,3,4,4,4,7,4,8,4,11,4,12 
11120 DRTR5,12,5,14,5,15,6,3,6,4,6,15,7, 
7,7,8,7,9,7,10,7,12,8,3,8,4,8,5,8,7,8,8, 
8,9 
11130 DRTR8,10,8,12,8,14,8,15,9,5,9,14,9 
,15,10,2,10,5,10,6,10,7,10,10,10,11,10,1 
2,10,15 
11140 DRTR11,2,11, 5,12,2,12,5,12,7,12,11 
,12,12,12,13,12,14,12,15,13,2,13,7,13,8, 
13,9 


PiO1, 2 月 号 で は , お 手紙 待っ て ます (PiO 編 集 部 へ ) と 書い て あっ た の に , 7 月 号 に は 書い て な か っ た の は , ロク サー ナ さ ん の と き に は ほ と に 
ん どこ な か っ た か ら で は な いで し ょ うか 。 最後 に 僕 は ぼ ち ら か と いえ ば クリ ステ ィ ン さ る ん の 方 が よい . . 
(コン ビニ エン ス ・ ベ ロリ ン は 5 月 号 p.165 の イラ スト を 見 て も らい た いね こま ん ま 虎 吉 の 友達 の 略 約 竹 入 雄 二 ) 


121 


ҮПШЕ-ЕГЕРІ 


008180 


2124511. 


チェ ッ カ ー 族 が 住ん で いた チェ ッ ク 星 に , 
強力 な モン スタ ー が 侵入 し て きた . モン ス 
ター に 対抗 で きる パワ ー ス ー ツ が 研究 され 
た が , 試作 品 が 完成 し た と き に は モン スタ 
ー は チェ ッ ク 星 の 92% を 制圧 し て いた . Ж 
こ で チェ ッ カ ー 族 は , チェ ッ ク mkII 星 に 
AUS S UL А 

あな た は チェ ッ カ ー 族 の 伝統 工芸 品 で あ 
る フラ ッ グ を 取り , モン スタ ー の いる ビル 
か ら 脱 出し な く て は な ら な い . 
АУТА イン フォ メー ショ ン 


| マシ ン 語 A800—EABF 
スタ ー ト А800 


| サウ ンド が ちょ っ と 物足りな い . で 
も と っ て も 楽し い ゲ ー ム で すね . 


CLEAR, R &HA7FF[ RETURN] を 実行 後 ,A 
800HーEABFH の マシ ン 語 を 入力 し て く 
7261, 

入力 が すん だ ら , ЅАМЕМ"7 7 1 мА” , 
p と し て セー プ 
ET ONO 


チェ ッ カ ー を テン ・ キ ー оа ГӨ] 
で 操作 し て フラ ッ グ を 全部 取っ て くだ る い 、. 
: そ し て 左上 か 右上 に 行く と 面 ク リア で す . 


は モン スタ ー に 捕まる と 死 
ー が 全 減 する と ゲー 


な お ぉ チェッカー 
ん ん で: しまい) 4x39 
poa ater t. 
>* ワ ー ス ー ツ は 取る と し ば らく の 問 チ ェ 
ッ カ ー が モン スタ ダー より 強く な り , この と 


TH 


画面 デー タ 


72vy27Hm7—57 

パワ ー ス ー ツ 座標 デー タ 
面 ど と の パラ メー タ ・ デ ー タ 
サウ ンド ・ デ ー タ 


き モ ンス ター を 捕まえ る と 100 点 入り ます . 

まだ た ダブル ・ フ ラッ グ は 取る と それ 以後 
フラ ッ グ の 得点 が 2 倍 に な り ま す . だ だ し , 
チェ ッ カ ー が 死ん だ り 面 クリ ア し だ 場合 は 
元 に 戻り ます . 

フラ ッ グ は 1 つ 10 点 で す が 。 取っ だ た フラ 
ッ グ の 本 数 が 取っ だ フラ ッ グ の ナン バー と 
一 致す る 場合 (ダブ プル ・ フ ラッ グ は 関係 あ 


り ま せん ) は 100 点 と な り ま す . 
フル ー ツ は 取る と 高 徒 


点 で す . 


自作 コン パイ ラ で 作り まし だ た だ. その だ め 
メイ ン ・ プ ログ ラム は 解析 し て も 意味 が あ 
り ま せん が 。 ラン タイ ム ・ ル ー チ ン に は 使 
қам с кы 


クラ ッ グ を で き る 限り 順番 に 取っ て いく 


азасы, МЕР, 2 
ルー ツ は 最低 の も の で も 300 点 と いう よう 
に 高 得点 な の で , な る で く 取 り ま し ょ 2。. 

パワ ー ス 一 
モン スタ ー を 追い 払う ょ いう 
方 が 安全 で す 。 V, 
ル ・ フ ラッ グ は 取ら な く て も 面 ク リア で き 
£. 

ii, チェッ カー の 移動 は 上 下方 向 を 優 
ELTS T, 


目的 で 使っ だ 


CHECKER マシ ン 語 リス ト | 


ツ は 3 一 5 秒 し か も だ た な い の で 


> ワー スー ツ や タブ 


м2 7—2-XUy 


仮想 RAM 1 キャ ラク タ に つき 4 

バイ ト 

+0 0 ひ … 空 白 1… は し ご 
2… 床 壁 3… フ ラッ グ 
4… ダ ブル ・ フ ラッ グ 
5… パ ワー スー ツ 
6… フ ルー ツ 

+1 ひ … 空 白 1… チ ェ ッ カー 
2… モ ンス ター 

T2 モン スタ ー の ナン バー 

+3 フラ ッ ク の ナン バー 


フラ ッ グ を 順番 どおり に 取る の は 難し い 


HIDH=SLDPI 
007011 


YDUR -SECDRFE 
pp TIR 


843843. 


ュ ン パイ ラ を 使っ だ ので, 制作 は 楽 で し 
p. しかし, テー プ ・ バ バージョン な の で 凌 
起す る だ びに ソー ス ・ コ ンマ パイ ラ や ラン タ 
イム な ど を ロー ド し な く て は な ら ず , 時 間 
は だ いぶ か か り ま し ただ. 

それ で も , 目的 に 合っ た コン イラ は 便 
利 で す . コン パイ ラ が な い 機 種 の 人 , な い 
な いと 言わ ず 作っ て み ま せ ん か ? 

K3 参 考 文献 
p “ペー パー ウェ ア ЕР-1100”7, ТҰН 
2) "280 7 е s n 2 x š ATT, 
ォ ー ム 社 


7 月 号 の Most 君 へ 、 ゼー っ と , PiOPiO 投 稿 者 に プロ レス ・ フ ァ ン の 出現 だ ぁ ー. 
知ら な い が , プロ レス 技 は 知っ て いる , x09 "ii Kb, C3. 
の ウォ リア ー ズ や 超人 ハル ク ・ ホ ー ガ ン の よう 


モー レツ に 感動 し て いる . 
P.S. Most 菩 は と て も し ぶ い レス ラー の ファ ン の よう で すか が , ぽく は 人 へ 
な 筋肉 レス ラー の ファ ン で ェ ー す 


と ころ で , ぼく は , BASIC は 


( 初 登場 MEKE) 
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AD 
AD 
A7 
c9 
6E 
21 
7С 
ce 


FF 


FF 


2419, 
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C9 
c9 
АҒ 
2B 
FD 
67 
E3 
4E 


21 
21 
91 
Ер 


211 
:28 
:44 
: D9 


N 


DUOC Tm OU LL O COA © OE 


e 


t4 Û Oum. Бы, Hae 


AF BO 
AFCO 
aFDo 
aFEeG 


AFFO 3 


eo 
eo 
eo 


Add 

нодо 
Bolo 
вого 
Бозо 
Бодо 
EOS 
BOGA 
Be7o 
BABO 
Боде 
Боаб 
pono 
BOCH 
BODE 
Berta 
Bero 


ーーーーーーーmーmmーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー…ーー 
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Add +© +1 +2 +3 +4 +5 +6 +7 +8 «9 +A +B +C +D +E +F Sum 
B900 5© ED SB ©2 60 ES ЕВ 29 29 D1 19 ED SB 94 60 ES :97 
B910 EB 29 29 29 29 29 29 29 Пі 19 ES 2A 98 60 EB El :37 
В920 73 C9 21 92 5 の ED SB 02 60 ES EB 29 29 D1 19 ED 1:32 
B930 SB 04 60 ES EB 29 29 29 29 29 29 29 01 19 ES 2A :А7 
B940 OA 60 EB ЕІ 73 C9 21 ӨЗ 5 の ED SB 02 60 ES ЕВ 29 :89 
В950 29 01 19 ED SB 04 60 ES EB 29 29 29 29 29 29 29 1AE 
B960 Di 19 ES 2А ӨС 66 EB El 73 C? 21 өө 50 ED SB 92 :28 
В970 60 Е5 ЕВ 29 29 D1 19 ED SB 94 60 ES EB 29 29 29 :63 
E980 29 29 29 29 01 19 E7 IF 22 906 60 C9 21 の 1 50 ED :44 
E990 SE ©2 60 Е5 ЕВ 29 29 D1 19 ED SB 94 60 ES EB 29 :6Е ` 
B9A0 29 29 29 29 29 29 D1 19 E7 IF 22 08 560 C9 21 02 :5С 


日 その 6) Sum: 36 2р в AB B9 AD Аі BD C3 29 DS АВ AÖ 3B 7A 17 :В5 
B310 
B320 
B330 Add +0 +1 +2 
E340 А Бадо o8 21 oo 
В250 BALI 60 21 E7 
E360 BA20 E7 01 21 
B370 Š BAZO E7 @2 C9 21 97 @0 E7 O6 21 97 ӨӨ E7 07 21 бө 00 :FE 
BIBO 3 BA4@ E7 ОВ C? 2А 10 60 ЕЗ 21 の 1 90 EB E1 E7 23 7D B4 :60 
Bi9o 3 BA5@ СА 69 БА DF 32 30 11 12 60 Е7 2E E7 11 C3 7E ВА :ВО 
HSAG ЕС А = з қ Ë 3 BAGG 21 до OO 22 OE 60 21 ЕВ ӨЗ EB 21 7C ВА E7 01 21 :98 
ESBeO a € ç BA7@ @1 OO E7 @1 EB E7 O1 21 OE 60 E7 @1 E7 @2 C9 2A. ОҒ 
eoo өс Š 5 Š 9 .|| BA86 10 60 ES 21 61 ӨӨ EB El E7 24 7D B4 СА AE ВА 21 :D2 
C3 x вАо9о оо оо 22 OE 60 21 2C 91 ЕВ 21 АВ ВА E7 91 21 の 1 :59 
F9 : a а BAAO ОО E7 O1 ЕВ E7 O1 21 OE 60 E7 O1 E7 ӨЗ C9 2А ӨӨ :0E 
HABO 69 11 Co HA 19 ED SE OE 00 ES EB 11 20 ӘӘ CF D1 :АВ 


ооф + 


Add +0 +1 42 +3 +4 +5 +6 +7 48 49 +A +B +C +D +E +F Sum 
EBOG 22 o0 ES 21 97 Өө D1 E7 ӨС ZA 48 60 22 46 60 CD :5A 
BBH1 の 9 9C BB 2А 48 60 ES 24 4A 606 EB El E7 27 7D ВА СА :В7 
BB20 3B BB 2А 48 60 22 4A 60 21 22 Өө ES 21 Өз ӘӘ D1 :RBO 
BEZO E7 OC 2А 48 60 22 46 60 CD 9C BB 2А 48 60 ES 2A :92 
BB49 4C 69 29 11 BC 69 19 F7 EB El E7 25 7D B4 СА 52 :97 
HESO EE C9 2А AE 60 23 22 АЕ 60 2А 4C 60 23 22 4C 60 :16 
BB69 11 12 60 DS DF 32 3 の E7 2F 54 51 АҒ 31 41 31 45 :6B 
BB7@ 51 48 21 45 31 48 32 бб D1 E7 2D CD 43 ВА 21 2B :95 
BB8O дд ED SB 4E 60 ES ЕВ 29 EB El C7 ES 21 ӨС 66 D1 :65 
ВВ90 E7 ӨС DF 32 30 E7 2F 21 ӨӨ E7 10 C9 DF 32 30 ES 1:51 
BBAe DF 64 59 E7 2F 20 30 30 IO ӨӨ ES DF 96 50 ES 2A :E2 


а cn eo a a a a a a a em sa ca oa ee aa a oa a ee mea sa em a si sm ma a me a a 


дб € oc € 9 o0 € 5 д BC29 E7 2E E7 10 C3 77 BC 2А 66 60 ES 21 06 00 ЕВ El :6A 
99 3 ВС5Ө E7 23 7D B4 СА 52 BC DF 32 50 ES 21 ЗЕ 0660 ED SB :ЕӨ 
oo oo оо ос э оо ос ВС40 50 60 19 ЕВ DF 64 50 E7 17 ЕВ E1 E7 2E E7 10 C3 :CO 
оо BC5@ 77 BC DF 32 36 ES DF 64 50 E7 2F 20 48 20 20 36 :ВА 
оо eoo € Š EC69 3B Фо ES 2A 06 60 23 ES 21 @1 00 44 4D Di El E7 :04 
КӨ E BC7O0 1B EB Еі E7 2E E7 160 21 の 9 Өө 22 OB 660 CD FE B8 :21 
F8 d 2 ac BCB の 9 C9 24 52 60 23 22 52 60 24 52 60 ES 2А 54 60 EB :26 
eoo € эс 2 5 BC96 E1 E7 25 7D B4 СА 99 BC C? 21 00 90 22 52 60 2А :25 


B600H~B7FFH は すべ て 00H | BCFO C3 BF BE 21 28 00 E7 20 22 46 60 21 28 ©0 E7 20 :АВ 
Add. +09 +] 42 +3 +4 +5 --------------------------------------------------------- 
EBOG оо оо оо оо oo ME oc оо оо cC e 5 2 оо :€ бит: F7 58 77 ЕС Аё 91 2E 4A ГА 73 C2 7F АҒ 62 96 BE :F4 
E810 оо оо оо oO оо оо OO OC 30 оо оо оо ос eo 

B8206 оо оо оо оо оо өө ос c ac э € ac оо 

назо оо оо оо оо оо OO оо OO OO OO OO OO OO OC eoo 2 Add +0 +1 +2 +3 +4 +5 +6 +7 +B +9 +A «В +C +D +E +F Sum 
E840 оо оо оо OO оо OO өс j ос ° 9 € оо :€ HDOG ES 21 40 90 ЕВ El E7 2A ES 21 00 OO EB El E7 27 :05 
Bg 5e оо оо бө оо до оо оо OO OO OO OO ос 2 2 eo ac ED1 の 9 7D B4 СА 1B BD 21 02 бо 22 SA 60 21 27 00 E7 20 :21 
BB866 оо оо оо оо oO OO OO OO OO C 2 ac оо g BD26 22 46 &60 21 27 ӨӨ E7 20 ES 21 O4 @@ ЕВ El E7 2А :FE 
E870 оо оо оо оо оо OO OO OO OO OO OO C ac eoo 2 BD3O ЕЗ 21 00 @@ EB El E7 27 7D ва СА SC BD 2А SA 60 :D8 
BBBO оо оо oo oo oo oo 2 5 3€ eoo BD49 ES 21 02 до EB El E7 23 7D B4 CA 56 BD 21 FF FF :ӨВ 
B896 оо oo oo eoo р oec оо оо оо € э оо :0€ BD5@ 22 ЗА 606 C3 5С BD 21 090 00 22 SA 60 2A SA 60 ES :7E 
EBAO оо оо оо оо O0 ° 2 2 515 э» оо BDé@ 21 FF FF ЕВ El E7 23 7D B4 СА éF BD C3 OE BE 2A :D5 
BgBo оо оо оо оо oO OO оо OO OO OO OO оо OO OC eo :€ вВр70 56 60 22 02 60 2А 58 60 22 94 60 CD 60 B9 2А の 6 :C2 
BSC? оо оо оо оо оо OC 3 өс 96 2 2 2A оо ED8@ 60 ЕЗ 21 の 1 90 EB El E7 23 ES 2А SA 60 ES 21 09 :@C 
B8DÖ 69 11 90 ӨЗ C7 gi 905: 2 aec | o2 BD9O0 до EB El E7 23 ЕВ El E7 2А 7D B4 СА CE BD .2A 04 :67 
BBSEO DES EB 29 29 > : 29 врао оо 2B 22 04 во CD A B9 2А 66 60 ES 21 O2 の 99 EB :84 
RBF À 3 ン 2 2 : 21 € 2 BDBO Еі E7 24 7D B4 СА СВ BD 2A 58 60 2B 22 58 60 2A :7р 


p eto tnn килен ндылы OR S лучы re RD © ーー テー MM "TILE amar INI VER P EOE P E Pct apps nm ET татат але таарна ле MES I Ee SEO P A a EPA D PATENT NATI. DNE мачак чалат тунида осете алые CU. UI NET RT E LIBET SR a PURI UP AND 

s (б) С © >「PiO な 人 は この 人 だ 」 с, みん な は 菓子 子 さ ん っ て 書き まし だ た か? も ちろ ん 書い た よね ー/ 私 は ゼッタイ に 菓子 子 く ん は PiO な 人 だ と 思 

いま す 。 イラ スト は うま いし 。 だ だ うま い ピ だけ で な く 《、。 い っ ぱい だ くる ん の オリ ジ ナ ル の キャ ラク タダ タ を 持っ て いま す .。 А-А, すご いっ ちゃ 。 

菓子 子 き ん が PiO に イラ スト が 載っ て か ら , 思わ ず 毎 月 2 冊 買 っ て , その 1 冊 か ら 菓 子 子 さん の イラ スト を 切り 抜い て まとめ て ある の で す ( 毎 
apum a LU ML RS 


Pio 
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2а 7D ва са C206 FF 2А 66 60.29 11 FC 60 19 ES 21 ON 99 ES 21 14 :CC 
C2BO 00 E7 1Е EB E1 19 ЕВ EI FF 2А: 60 &40 29 11 EB 60 TAB 
CEC 19 ES 21 04 00 EB ЕР ҒҒ CS 27 C2 2^. 6А 60 29 11 168 
C2DO 98 60 19 F7 22 02 60 2А 60 60 29 11 АС 60 19 F7 iD6 
C2E の 22 04 60 CD EC BB 2А 6 60 29 11 AC 60 19 F7 23 167 
CAFO. 22 04 69 CD БА B? 2А 96 60 ES 21 90 00 EB Еі EZ :ВҒ 
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:D 
sF 
:4 
:7 
$1 
:B 
sD 
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СЗҒӨ F7 2B EB Et FF 2А ФА 60 29 11 FC 60 19. F7 ES 21 


Oo 
+ 
O 
© 
o 
© 
ы 
`0 
к. 
к. 
D 
O 
o 
© 
M 
0 
т 
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m 
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ы 
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Add +0 91 92 93S +4 +5 96 97 48 99 +A «B «C +D *E +7 Sum 
С500 E1 C7 22 46 60 C3 éF CI 2А АА 60 29 11 98 60 19 :А6 
C510 FZ ES 25,956 60 ЕВ Et E7 25 7D B4 СА 2B CS 21 92 :n0 
C520 の 9 E7 1E 25 25 22 46 60 C3 éF C5 2А. 6А 60 29 11 158 
C530 98 60 19 F7 ES 20 56 60 ЕВ Е! E7 27 7D B4 СА 54 :1F6 
C340 C5 2А ФА 60 29 11 Со 60 19 F7 CB 2C CB 1D 22 46 TOA 
C550 60 CS OF C5 21 01 00 ES 2А 6A 60 29 11 СӨ 60 19 :С5 
C560 F7 ЕВ Е! ES EB CB 2С CB 1D ЕВ EL C7 22 46 6 の 21 ТЕЕ 
C570 01 00 22 72 60 11 12 60 DS DF 52 50 ES 2А 46 60 143 
C590 11 32 00 CF 11 IE 61.19 EB El E7 2E Dt E7 2b BF 460 
C590 52 ЗӨ ES DF 64 30 11 12 60 E7 2E ES 2А 72 60 ES 1:18 
С5АӨ 21 01 ӨӨ 44 4D DI Еі EZ 1B EB Еі E7 2E E7 13 ES 127 
СВО 2А 6A 60 29 11 CO 60 19 F7 EB El 19 ES 21 ӨЗ 00 :4C 
CSCO. ЕВ El E7 2А 22 5а 69 CD 46 Сё 20 74 ёд ES 21 66 :96 


51909 660 21 99 дё 2 21 91 00 E7 61 EB :4B || --------------------------------------------------------- 
C116 2 Р 2 29 FE Sum: 2B 51 6D 83 23 E9 20 FE DC 7D АВ ФЕ 64 CO 76 09 :1E 
C120 : 
C136 | 

C146 94 өе 2 9 2 2 52 Add +Q +1 +2 +3 +4 +5 +6 +7 «8 +9 +A +B: «C +D +E +F Sum 
C150 00 ES 2 Š : 2 : ¡C600 60 29 11 98 50 19 F7 ES 2 &^ 60 29 11 CO 60 19-1EE 
C169 21 28 oe に э 6€ - эе ROTO F7 29 11 AE 62 19 F7 EB E1 19 ЕВ E FF 2А БА 60 (Ғ5 
C170 32 56 21 20 06 : С620 29 11 AC 60 19 ES 2А ФА 60 29 11 AC 60 19 F7 ES 175 
Ciga 1 : 3 2 P 2 Š 2а € А C630.2n-6n 60:29 11 CO 60 19 F7.29 11 B6 62 19 F7 EB RB 
(190 E? 25 ; , じ 64 の Е1 19 ЕВ EL FF C9 2А 6A 60 29 11 98 50 19 F7 ES «А? 
‘LIA 2 7 де ЭС 21 02 96 Муде 2 00 2 CeSe 2А SA 60 29 11 АЕ 62 19 F7 ЕВ Еі 19 22 02 60 2A sD1 
CIBG D RO Жі OI M 23 J C669 GA 60 29 11 AC 60 19 F7 ES 2А SA 60 29 11 Bé 62 13B 


C200 2 2 n 2f 4 6 2 84 -2 T"——————————————— 
C210 01-2 9 2 2 2 3 5 Sum: 29 ЗА 9E 99 05 EE F8 60 56 AE 32 60 ES ЕВ АВ F2 :ES 

C220 2 

7250 < 2c 

C240 CI 2 2 22 € 2 5 22 2 Add +9 +1 42 +3 +4 +5 46 +7 +8 +9 +A +B +С +D +E +F Sum 

C256 : ‘A. 9 ES 2 зо әс 2 C700 E7 25 7D B4 СА 1B C7 2А 96 ёб ES 21 91 00 ЕВ Ei 14A 

C260 2 n ee 2 D е 2 : C716 E7 23 7D B4 СА 1А C7 C3 АЗ C7 C9 C3 4А C7 2А 6А 144 

“270 5 2 2 9 1 Ë C720 60 29 11 CO 60 19 ES 21 04 90 E7 1E ЕВ El FF C9 176 

C280 : i 2 Ee ; 2 2 C730 21 96 00 E7 1E 22 46 60 C3 БЕ C5 21 02 Од E7 1E :13 
C290 F2 ó 2 Š 5 21 02 2 C746 11 96 бө 19 22 46 69 CZ OF C5 2A 04 60 23 22 @4 :C6 
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ec DF 3 
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の 1 21 
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довтогологроть 


CROG 2 2 5€ 2 bü ETON EE CE OE MOMS Mera кин E LUI e qe t 
СВ10 


CB 

CBSO 2 

CB49 2 

CB5O ос { > E7 22 535 2 5 5 Dooo 

CEO 2 5 эё 2 2 2 DOLG 

CB70 2 C 2 5 > 2 DGG 92 2 3€ J э 21 oo oo 

CB86 8€ Š 2 % 2 2 9 の 9 22 € 0 むさ резе 22 2 60 2 зә оо 22 eo 21 

CROG ; の 22 : 2 C роде 2 : 2 22 56 60 

CRAG 2 2 Dose 2 9 の 22 ; эө бө 22 
DOGO 22 2 22 э 21 oo 
ро7ә эө 22 %2 2A 46 
рове NX C9 24 
De9o Ф 5 De 2A 
родо { 2 9 20 の 25 25 

=т= --------------------------------------------------|| DeBe 2 AG 2 91 21 о4 

} DOCG Š 52 30 
рәро ac 2 B8 E7 
DGE9 € р 2 2 қ э CD ра 
*6 +7 +8 +9 


Ол こと に ぼう や っ て 書き 出し て いい の か よく わか ら な いん で すね .。 これ が 。 だから 「 突 然 で す が 」 と か ,「 え っ と 」 な ど と 始め る 人 も いれ ば , 
「 こ ん に ち は 一 で す 」,「 初 め あま し て 」 と あい る つ す る 人 も いま す . C, と どの つま り 何 が 言い た か っ だ た の か と 申し ます と , そん な 前 置き な ん 
ЄС か は スッ と ば し ちゃ っ て いき な り 本 女 か ら 始 め た ら ど うだ ろう か と いう こと で す . そん な こと た したら お か し く な る ん じゃ な いか ? と 思っ た 


° (O) О; Q9 p PiOPiO の 書き 出し に つい て … ほ と ん どの 人 は PiOPiO に 葉書 き を 出 を そう./ と 思っ たら, さっ そく 〈 筆 を 執り ます . …… ん 一 ? す る と 困っ た 
A! 


Т < А 


pio 


DIOG + 
0516 
Diae 
ОЛО 
0548 
D350 
D36@ . 
0576 
058% 
Dio 
Diae 
D3BO 


32 350 ES 3 5 D54ae 
рве 
DISCO 
реро 


 CHECKER マシ ン 語 リス ト 


あな ただ た 。 た めし に 今月 号 で も 先月 号 で も いい か ら , その よー な 前 置き で 始ま っ て る の が あっ た だ ら 前 置き な し で 読ん で みて くだ さい . あま り 変 
(どー で も いい よう な こと に こだわ り 長 々 と 書い て し まっ た , ぴい ぃ えす) 


わら な いと 思い ませ ん か 


pio 


CHECKER マシ ン 語 リス ト 


DFG · 
DF16Ó 
DF 
DF 3O 
DF 40 
DF50 
DF óG 
DF76 
DF ヨ @9 
DF? 
DFAe 
DF E9 


---- -------------------------------------------------------------------------------------.-.--.-.......---------..---- 


DBoO 
DB16 
DB260 
DEZO 
DB46 
рве 
DHOG 
DB76 
DB8O : 
DEGO 
DBAO 


225 
E040 
EOSO 
E の 969 
E076 
E の 8 の 9 
E9 ワ 9 
EQOA 


——————————— — ——— — — ا ا — н‏ — — — — — — — ا —À‏ — — — — — — — ا Á‏ — — س 


ーー ーーーーーーーーーーーーーーーーー バ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


E200 
E210 
E220 
E236 
E240 
E250 
E260 
E2760 
E280 
E290 
E2A0 


---------.-.........................................................3 م 223.23 32323232 2 32 2 مس م — س‎ 2.23“. ыз س‎ M ست س‎ — 2. сше 


С 
o 
iQ 
> 
ке 


[27] 45 


Li C 
(А 


L4 
4 £4 04 š. 


А 


(д А АГА + 
Ld Ld bi id е. 


(А (4 C4 C4 {АА CI L4 АА لے ی ی ص‎ + 


iAd إل‎ ЖЕҢЕ 


L Ld iA 


Q4 LF ا‎ 


(А C4 к” C4 ii CÀ LA C4 id C4 C4 C4 id 


(А 64 Á 
ҚА CA 04 id C4 CI id C4 н д m 


Ж Gl f» Gl Ci GÀ GL GE C 


e 04 C4 C4‏ إن C4 C4 C4‏ إا 


54 CA 


A إن‎ CE (д m = (4 = GP СА = بن‎ 


d дА L4 (АДА CI Ci C4 Ci 


= b oi GG 


(d CI е‏ إن o Ci A‏ ص 
C] CJ CI id id C4 bd ЖЕШ ЭШ CI UI 0‏ س إن 


Ааа CE CI GI GI = CE G1 GE Úq CE CI + 


td CI C] إن‎ C] CI > G = C4 C4 CI id CI Ci + 
(d (4 bi ТАСА m iAd id bd C4 ҒА 


(дА дк COE GI m m Gi ААА S н 


= @ id CI CI ص‎ CI д id CI m id ii i O + 
L4 Q4 C4 C4 ЖЕШ Cj CU ҚАНА C4 id C4 


Б C4 C4 m m C4 CJ C4 CA id š. 


= | Ci (А فا‎ GI id = (А GI = 


„КА C4 m — (А C4 А C4 {А id iA CI C4 C4 S 


AA m CÀ C4 id C4 C4 C4 C4 н 
(А (А (4А А id CA 
= m id id id 04 04 C 


id id id id 


TEZE” 
عم‎ Ql id 


ET 


+С +D +E +F Sum 


1 つ だ け 言 いた いこ と が あり ます . PBiO バ バザール の あて 先 に 電話 で いろ いろ する の は , ぜったい に や め ま し ょ う . これ は 僕 の 堅い 経験 か ら 
もろ で いる の で す 。 P.S.1 宮嶋 あて に PiO バ ザー ル で 手紙 を くれ だ た 人 ご めん な る さい . PS.2 クト ゥ ルー さる ん へ . 僕 は ヨ グ ・ ソ トー ト の 味 
Ji? CT. | P.S3 介 落 ち 込 ん で いま す ( 中 嫌悪 ). PN IG! | (Boots) 


pio 


CHECKER マシ ン 語 リス ト 


SS の 31358 33 33 15 359,35 SILAEA E760 51 55 55 55 33 53 33 55 33 53 33 15 33 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 ーーーーーーーーーーーーーーーーー ニ ーー || ۴770 33 55 13 55 55 55 Ө] 33 33 33 13 40 23 12 40 21 :96 
Sum: 98 24 97 57 91 3D 17 79 СА ЕВ EC E6 AA 98 EC 44 :74 ELO 34:02 51-55 55 53-15 35 35 55 15 $3 231.58 ESAS TT 
8 E790 55 33 00 OO 10 OO OO OO 13 33 ささ 33 55 109 00 OO :45 
` E/,9-35/15 35-5101 33 31.35. 31 89 21:33:31. 33. 13 AM 001 
Add +9 +A +E +C +D +E +F Sum ЕВО 53 うま に きま ささ 33 15.535 うき 35. 531.831 33 35 22.14 35D 
E420 る SE E/LO0.02 13 31 33 31.40 25 35:51 335 うさ .13 3535-53 35 35 EBS 
Е41@ SSS 51 32 51 52 53 СА || E7DO 17 $55.15 255.31 5.355. 2153 33 31-394 02. 231. 55 OI :95 
E420 2% 19 9 367127235 10:68 E7TEO 33.40 25553-35 づき 13.135.900 OK S1 23$ 31.54 341.33 32065 
E430 Ж 13.55 324 13. СО 25 АЛ ас E7FO 33 15 55751755 3223 13 354 01.3313 381 35.40 23 33 190 
E440 33 33 ^e cs Si ЗУ SX LE SAP ДҮН ТЕГТІ APA и еее иисе ы» анны Янын 
E450 33 Ж 33-33 52 1995 94 300 Sum: 9A 8C 45 94 75 Её 37 DA B4 1B 78 DA E? B3 98 88 :48 
E4660 33 2 S3 35 31 354 02 15 33 :98 
E470 : 3 135 35 02.55 31..35 53 YD 
E4806 5 02 31 33.33 31 33 30 :99 Add. t0 91 +Z 05 44 45 +6-+7 Еж +Ñ E: С tD ЖЕ «F^ Sum 
E4960 32 55 52 15 5 15 55 55 02-55 BH E800 15 55 o0 OO OO OO OO OO OO OO OO OO OO OO OO OO :46 
Е4АФ : 51 3 535 13 33 33 34 02 51 :6A E810 ОА 17 16 14 ӨЗ OE 13 OE 13 OB 19 OE 1B 14 OS 14 :OC 
E4ABO 33 33 31 : 41 54-02 12559 3L $55.22. 35 335 SX BA E820 07 OB ОВ o5 ОҒ 68 OD 05 o8 11 19 14 11 17 OF ОБ :DO 
E4CO 351 55.55 353. 39 さき 13 33 52-52 33 31.33 33 S31 TI %0А E830 94 14 o5 08 ӨЗ ӨЗ 11 O02 ІС 11 18 98 OC 17 18 062 :CC 
E4ADO 31.33 : QUE MS 15.53. 439 ш о. 454 5055 SL SS S.S 53 ТЕЙ E840 07 OE 15 ӨӨ 06 OB 11 OE 18 11 O4 14 04 17 12 14 :E1 
Е4ЕФ 35-25 15 33755 21 3992 OA LX 35'13 33 199 E850 1C OB OC OB 12 OE 096 14 1B O8 13 05 09 98 15 OE :Е7 
E4F の 33 51 33 33 40 25 51 33 53 15 53 13 55 33 :Е7 E860 02 14 18 02 1А 17 95 92 11 の 2 01 14 1C OE 07 OE :CF 
s E87@ 17 14 15 OE 19 05 10 o5 o4 ӨБ 1B 17 15 OB 1B 02 :F9 
Sum: DC AB B ӘС ЕС ӨБ 05 БӨ B4 98 ED 66 АҒ B7 SC E8.:8HB E880 18 OB 12 ©8 OC OE 06 OB O4 OE 15 11 OB O2 09 O2 :в5 
Add +© +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum E890 1B OE OA 11 O4 17 11 17 ӨР OE 1А 14.19 OB ІС OE :20 
ES00 31 53 35 31.40 25 53 31.33 30 22 33 13 33 S3 33 FA EBAO 10 02 OA OB o5 OE o5 o5 ӨР 11 OF 17 15 ӨЕ o9 o5 :B6 
ESIO S1 $3 40725 13 SS SS 35 13.53 233 3$ 22 15 さき E TC ЕВВО 1А ©5 1А OB 14 14 ØA 14 91 OB @2 ӘЗ 15 02 ӨН OB :C7 
EX 40 25 35 31 33 55 35 31 33 33 33 355 51 53 40 21 :22 ESCO 1C 08 OD 17 ӨЗ 11 15 OE 02 OB OE 05 02 08 OE 11 :Сӧ 
коз 31.55 3335.21. 31.40-14-02 35% さる 35 る る 51 5S4 IES EBDO OB 14 17 ӘБ 95 11 OB 11 OE OB O9 O8 18 05 15 11 :EO 
E540 02 31 33555 132580 33 31.31.31: 51 3S3 31.32 33 3X ED ЕВЕО 19 14 12 14 12 17 OB 17 OF 11 OF OE 1B OB 99 OB :12 
ESSO 13 53 335.40 33 5545 81.395 AE 33 33 33-1535 33:353 408 ЕВҒӘ 1А 14 91 14 16 95 OZ OB O02 OB OE OE OE 95 11 14 :C9 
E560 31 33 531 33 31 55 55 33 34 02 55 53 53 31 53 31 』F6 || --------------------------------------------------------- 
EDS2/O 31.5159 DA YS Si Qi 31540 2 33 SS. 21554 OS の бит: 1B OE ЕВ БА BD DZ AE B7 C3 B4 F1 D8 95 B4 ЕВ B1 :51 
Е990 40 02 ^31 ӨЗ ІЗ 91 40 25 る 1 33 31 55-52 31 40 02 15B 
E590 55.35 35 33 40 21 $3 532 33 X3 $31 32:33 13 33.13 ұқ? 
ESAO 55 55 31 535 ささ 13 33 13 の 1 бө бө 10 OO 10 の 9 O2 :79 Add +0 +1 +2 +3 +4 +5 46 47 +8 49 +A +B +C +D +E +F Sum 
ЕЗБӨ-55 X530 34 O2 353 35351 SS М ЗУ 5313 535 51 323 IDA E900 ІС 17 18 13 19 QE 12 OB 18 608 ӨЗ 11 1А 92 ІС 17 TAS 
ЕЗСӨ 35 13,353.13. 33 335.15 92233 33 33 40 23 33 33 33 40D E916 04 02 97 17 01 OB 1C OB 01 OB 15 ӨӨ 08 OE 15 02 AD 
ESDO 15 33 33 13 24 OO OO OO оо оо OO OO OO 21 ZZ Z1 :45 E920 ӨН 08 15 OB 15 o5 ØA 08 O8 14 13 11 OB の 2 の の OO A7 
ЕЗЕӨ IS 15 31 359 SY 0589.5 1-292513 201 353 31 359 335 15 331 CÓ Е920 16 ©2 19 OB OD OE 15 ӨР? 10.11 o7 O2 17 O2 15 OB :CF 
ESFO 55.55 うう 02 33 55-53 53 35 33. 13.31 15531 34 00 189 E940 1C OE OF 17 10 O2 16 98 ӨЗ O8 10 OE 14 11 12 17 :F7 
dem i nt کا‎ Sui im سے‎ gri eo oo егіс tir کے‎ n io сыл iio cti РЕ ip iii diro iim ion md ot ln nin aive on ОНО ES ан E950 15 OE 1А 05 08 ОЕ ОС 95 16 OB ОС 05 OF 14 15 OB :D9 


Add 4-2 45 94 45 6 97 8 99 +A +82906 D ФЕ P. Bun E990 1E 27 O5 АВ 1E 26 05 41 1E 26 O6 46 1E 25 96 SC 1:34 
E6600 ӘС oo оо の の の の 00 21 55 33 SS 15 353 13 53 53 179 ETOO IB «9017980 IE 24 Ө7 55 1E 25 97 32 1E 22 の 7 20 EE 
E616 51 うさ 33 51 33 15 33 15 33 14 02 31 55 33 17А E9BO 1E 21 07 28 90 бо 00 оо OO OO OO OO OO OO OO OO :6Е 
E620 33 51 55 31 55 33 31 ӨЗ 13 55 51 52 31 33 55 :B5 | Е9СӨ 60 19 20 10 50 10 10 10 40 10 00 дө OO өө OO OO :70 
E630 33 55 55 15 5502 $5.15 35 31 51793 55 55-55 36 E9DO O00 の 9 OO OO OO OO OO OO OO оо OO OO OO OO OO оо :00 
E640 52 55 51 02 SS 55 15 35 55 33 351 355 55 15 33 :ВВ E9EO 40 19 50 10 ёб 10 70 10 ӨӨ бө OO OO оо OO OO до : до 
E450 13 02 55 15 51 55 35 13 33 55 13 33 33 53 51 :7B E9FO бо OO оо OO OO оо OO OO OO оо OO оо OO OO OO OO :00 
E660 33 55 55 55 15 33 13 55 33 15 33 33 33 33 33 :В0 || ------------------------------- анна ли rt) iE pb Vie ші місе UN چ‎ A qi ی‎ i 
E670 55 51 ささ 55 13 33 31 33 13 33 54 02 15 34 :7D Sum: AS 07 ІС А 6C ҒЗ 10 24 FB El 7E 1А DF C9 BA 00:81 
E680 35 53 40 25 55 51 10 21 33 15 31 061 31 55 :4F 

E6960 X3 25 55 34 01 10 23 13 33 33 の 1 33 31 40 24 1:73 

E6AG 51 01 10 15 10 25 15 55 55 55 40 02 55 55 іҒІ AGG 4041 92 935 4 +5 96 97 «8B «9 ^A «B «C «D ФЕ жҒ бот 
EGBG 10 55 50 25 13 40 25 33 34 の 1 53 31 34 の 1 :21 EAG ро 10 BO 10 90 10 79 10 90 OO OO OO OO OO OO OO :CO 
Е6СО 5 15 55 15 51 55 51 55 31 31 55 31 01 10 23 :4E EALO 00 оо OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 
E6DO 55 55 35 55 40.23 55 55 55 53 35 01 33 13 53 15 :BB ЕА20 20 10 39 10 40 10 50 10 60 10 Во 18 00 OO 90 OO :28 
E6EO 1 55 55 15 33 33 51 535 55 33 33 15 33 355 53 :ЕС EASO оо оо оо OO OO OO OO OO OO OO OO OO OO OO OO OO gk の 9 
E6FO 55 13 33 S3 13 53 51 33 S3 335 53 13.535 31 SS 353 1CC EA40 90 20 70 20 50 20 бө оо OO OO OO OO OO OO өө OO :ВО 
ی‎ in need i i Ai do ei jn бә eh ces wei ip ——— << EASO ӨӨ の の OO OO 00 OO OO OO OO OO OO の の OO OO OO OO :00 


Sum: F8 26 73 C7 1F 55 44 АЗ 4 DC ED F5 Е9 20 D9 BE 1:58 EA60 60 10 50 10 40 10 20 10 OO oO OO OO OO OO OO OO :60 


EA76 оо оо оо оо OO OO OO оо оо оо OO OO OO OO OO OO :00 

EAB? 90 50 ОО OO OO OO OO OO OO OO OO OO OO OO OO OO :EO 
Add +@ +1 +2 +3 +4 +5 +6 47 +B +9 +A +B +С +D +E +F Sum EAŞ9 оо оо Оо OO OO OO OO оо OO OO OO OO OO OO OO OO :00 
E/00' 13 95 15 31 35 35"92-24 353 33 3H 35 335 S513 EX rA EAAG AG 10 90 10 BO 10 70 10 60 10 50 10 4O 10 zo 20 :DÖ 
ЕЛІ: 235.23 997 =, ША ы. 35051 $3 31392 15 35 33 30.13 35 309 EABO 10 10 OO OO OO OO OO OO OO OO OO OO OO OO OO OO :20 
Е720 51 33 33 15 33 55 53 33 55 13 33 13 33 31 53 S3 асс || ーー ニー ニー ニー ニー ニーーーーー ニ ーーー ご ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー デ ーーーーーーーーーー 
ЕЮ US ЮА 233215 35 S435 55 15355 35 15 35 35 E88 Sum: 260 CO 50 60 EO 60 69 40 Co 20 DO 28 460 10 59 20 :C8 
EIA SI X I4 02 13.31. А5 53 31 32.25.32 55 13 33 33 ЖЕ 
EZ OO SS = S. ra: SP SI 55-55 S1. 339-39 33 53 53 55 33 FF 


УА ААЛУ D D S УУЛУУ УУУУ R4 се 4 4 4 P4 4 4 4 4 4 O4 X X OR XA а 


N/N/N/N/ N N N N N AN NAYNAYNAYNMNA/ ANA Y NÉ NÉ NÉ NÉ で ペン ベベ ベベ べべ ベタ АУДА? "УАУ "АУАУАУАУАУАУ "АУ" VV N N N N N АЧУ АМР ЧР АЧУ АЧУ АЧУ АЧУ ОЧУ ЧР AMNA AYAY N AN AN NAN NN 
поток” СУ” “Ч Т0 то УКАЗ O, )000000000000000000000000000 
00000000000000000000000000M( е reader о 


ГҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮТҮҮҮТҮҮТҮҮҮТҮҮҮТТТҮҮҮҮҮҮҮТҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮЇ 
› à . 
CemPrIQ 


イス に / プ ヤン に オン ソリ ツレ アー ツン ot 


圏 コ ンプ ティ ー ク か ら , 博物 館 の 絵画 を 盗 ハイ スト Ұ5,900 

み 出 す ス リル ある ゲー ム “ハイ スト "と, チャ ン ピ オ ン ・ バ ル ダ ー ダ ッシュ 
洞窟 に 埋もれ た ダイ アモ ンド を 探り 出す , Y 5,900 

思考 型 ア クシ ョ ン ・ ゲ ー ム "チャ ン ピ ォ オン“・ 〈 問 い 合わ せ 先 〉 (株) コンプティーク 
バル ダー ダッ シュ "の MSX 版 が 発売 され ま 89102 東京 都 千代 田 区 隼 町 3-19 
T T ` 清水 ビル 4F 

(іп) 7%(03)234-8041 


129 


JH- 100 


BASIC 十 マシ ン 語 


x 


ハイ ッ ノ MASS シ リー ズ の 4 作 目 で す 
よ ( と いっ て も 3 作 目 し か 発表 し て な か っ た 
りす る …). 今 回 は , な ん と 1 人 で も 2 人 で も 
遊べ て し まう と いう , 明る い ゲ ー ム で す . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 


"| マン ン 語 C000—COFF 


YY? 
うっ 


D D 


2 人 で ゲー ム を で きる よう に し た と 
は 考え まし た ね . 敵 を お びき だ し た 
りす る の に 頭 を 使い ちょ っ と パ ズ 
ル っ ぽく で き て いま す . (V) 


BASIC を セージ L, 何ら 6 か の 方 法 で 打 
ち 込 ん だ マシ ン 語 を ASAVE “ファ イル 名 ", 
$COOO, $COFF で BASIC の 後に モー し 
E. 実行 する と き は BASIC を ロー ド し 
RUN す れ ば , マシ ン 語 を 自動 的 に ロー ド 
Laws | 

72314, BASIC 部 は 一 見 リナ ン バ パ バー され 
て いる よう に 見 えま す が 。 実は 時 々 番号 が 
飛ん で い だ り する の で 入力 の 際 は 注意 し て 
ФАа-ДАЯ 


НОУ/ ТО РІ.АҮ 


デモ 中 に | RETURN | キー を 押す と 1 人 で 
遊ぶ か 2 人 で 遊ぶ か 聞い て くる の で 
| SPACE | キー で 選択 < か ら | RETURN | 
キー を 押し て くだ る しい 、。 

ゲー ム の 進め 方 や を キャラクタ 別に 説明 し 
Ғы ا‎ | 


PLAYER (CZv/Y Y—) 


左 か ら 出 て くる 白い の が PLAYER -I, 
右 か ら 出 て くる 黒い の が II です. 1 人 用 の 
と き は I し か 出 ま せん . キー 操作 は 図 の と 
з О ТТ. SET の キー を 押す と , いま ま 
で 進ん で いた 方 向 , まだ は その 瞬 問 押 し て 
いた 移動 キー の 方 向 に エサ を 出し ます . 


MASS (%О 


993090909909 PEN つう うう うう うう 4 


どう し ょ う …。 わ ぎざぎざ と じゃ な いん だ / あ の と き は 頭 が も うろ うと し て いた し , 


Be edo 
PLAYER-I . 


52tMASS&*UO&OU CZ o5r9ym-s / 


| 


= 
390989 うう ラス フフ ラス クコ 


* 
d 
* 
* 
* 
Ж 


же» 
ж; 


面 が 始ま っ だ と き は 不景気 な 顔 を し て 2 う 
ろ つ き 回 っ て いま す . この 状態 の と き は 
PLAYER の どちら か に 人 迫っ て き T, 
PLAYER は これ に 触れ る と ミス に な り ま 
+. た だ し , エサ を 食べ る と 表情 が 変わ 0, 
その エサ を くれ た だ PLAYER の 家 の 方 向 に 
歩い て きま す . この 状態 で は , 触れ て も ミ 
x U t p b EA: 


ГООО СУ) 


1 画面 に 何 個 で も 出す こと が で きま す . 


CAGE (ケー ジ ) 


1 画面 中 に 数 個 あ り , この 中 に MASS が 
入る と 両方 の PLAYER に 点数 が 入り , < 
の MASS は 死に ます . し か し あま りこ の 
中 に MASS が 入り すぎ る と クリ ア で き な 
く な り , 両方 とも ミス に な る こと も あり ま 
4 


HOME (x) 

左端 の が PLAYER- I OC, 右端 の が 
II の 家 で す . ここ に MASS が 入る と 得点 
に な り 。 合わ せ て 10 匹 入る あと クリ ア に な り 
EY. 多く 引き 込ん だ 方 に 面 ク リア 時 の ボー 
ナス が だ くき ん 入り ます 。 


etc (その 他 ) 


ро, fff A 5 EIC 女 だ .」 と 思い 。 きっ と 出 た 


PEEK 用 
GOSUB フ ラグ 

面 数 

取っ た エサ の 数 

ケー ジ 数 

ベス ト 10 

ルー プ 用 

PICK 用 

メイ ン ・ ル ー プ 用 
MASS% 
残り の プレ イヤ ー 
キー スキ ャ ン 

プレ イヤ ー 1 の 座標 
プレ イヤ ーII の 座標 
MASS の 座標 , その 他 


3 面 ご と に “ボー ナス ・ ア ウト " が あり 
ます . カー ド が 表示 る れる の で , それ を ど 
ん どん めく っ て いき ます ( 体 当 だ た り し て いく )。 
MASS が 出 て くる と 終わ り で , MASS を 残 
し だ まま 全部 ゆく る と パー フュ クト ・ ポ ボー 
ナス が 入り ます .。 まだ で スト 10 の ハイ ・ ス 
コア を 取る と , 6 文字 まで の 名 前 書き が で 
ЖТ. 


いや ー。 JR-100 は 速い / きす が 整数 


“ЖЯВАСІС, こん な ゲー ム を 作り や すい 機 


種 は な い だ ろ う ( 勝 手 な 意見 だ …). 
書き 忘れ まし た が , この ゲー ム に も 例 に よさ 
っ て アイ テム が 出 ま す ( ワ ンタ ー ン が だ ど )。 
出し 方 は ある 場所 に エサ を 置く と メッ セ 
ー ジ と と も に , 効果 が 表 わ れ ます . これ は 
面 ご と に 決ま っ た 場所 に ある の で , 1 度 出 
Ж ЫНА ж Меч "л. Qe S EW, WB 
EATR また, 
3 参考 文献 
WFA: “PLUTO”, РіО, "84 年 4 月 号 


だ が そこ は 何と 女子 便所 だ っ た の だ / IIZI о t Ж 


5 ちの 学校 は あ を そこ だ け 男 子 便所 と 女子 便所 の 壮 び が 逆 な ん 


EE コネ 信和 SS ららら る ら 2 
е Q ぁ 俺 は ひょんな こと か ら 手 を 汚し た . (Ei FES OD CERA N ТАСЫ» 9729554). ü Qó Chh EIOS. Тео 
HO es (o) いる と 横 に 女の子 が 来 た . 
Є" 4... & UT. D, さっ き と は 別 の 女の子 が 俺 に つい て 来 て いた .「 や ば い /」 俺 は その 女の子 を まい て 教室 へ 逃げ た …。 今度 あの 女の子 に 会 っ た だ ら 
ҳа 


30 HE 


/————— リス ト 1 MASS-4 BASIC д F 


10 GOTO1410 
2 の 
50 FORL=1 TOM: P の =USR (まさ F の の 。 の 。 の ) 
40 P1=USR (まさ F の 0 。 9 。 1 ) : P2=USR (まさ F の の , 0,2) 
50 P さ =USR (まさ F の 0 。 の 。 さ ) : 5=USR (まさ F の の 。 0,5) 
60 P6-USR(SSFOD, 0,6) :P7-USR(S3F00, 0,7) :P 
8-USR ( まさ F の の 。 0,8) 
70 X1-((PQ-25 1) - (P2=253) ) *32* (P1=253) - (P ` 
1-254) : IFX 1THENX2=X 1 
80 Y1=((F フ =247 ) -(P52251) ) *32* (P62251) - (Р 
62253) s IFYITHENY2-Y1 
90 ІЕР5-25460Т0500 
100 ІҒРВ-2595070540 
110 С1=РЕЕК (Х+Х1) : С2=РЕЕК (Ү+Ү1) 
120 ІҒСІ-129650Т02500 
150 ІҒС2-15980Т02220 
140 X1=X1*(C1= の ) :Y1=Y1*(C2= の ) 
150 POKEX,0:POKEY,O: X=X+X 1 : Y=Y+Y1 
160 POKEX,124*R1:POKEY,135*R2 
170 IFV(L) THENA2-287*V (L) : GOTO200 
180 IFRND(2) THENA2-X-$C100: GOTO200 
.190 A2-Y-$C100 
200 А-2(1)-%С100:А1-А2/22-А/22:А-МОр (A2, 
52)-МОр(А,22) 
210 A1=SGN(A1):ñ=SGN(A):Z1=ñ1*32+A 
220 IF(Z1= の ) *V(L)GOTO1220 ` 
230 Ci-PEEK(Z(L)*21):IFC1GOTO280 
240 POKEZ(L),0:Z(L) 2Z(L) +21 
250 POKEZ(L),128*(V(L) = の ) 
260 NEXTL:GOTOZO 
PEEK SUB 
280 IF (C1=134) * (V(L) = の ) GUTD2 さ の の 
290 IF(C1-135) * (V (L) 0) 60702220 
200 TFC1=E1THENV(L) 2-2: B1-2: 60508460: GOT 
0240 
510 IFC1-E2THENV (L) «27: В2=2: 50508460: GOT 
0240 
320 IFV(L)GOTO240 
30 IFC1X*137THENZ 1 = の : 6070240 
MASS LIMBO 
550 POKEZ(L),126:POKE1,200:GOSUB370: POKE 
1,200: GOSUB370 
260 POKE1,150:GO08UB270:POKE1,$4A4: GOTO380 
BEEP1:FORI-0TO20:NEXT: BEEPO: RET 
РОКЕ2 (L) ,8: Z(L) =Z (M) : М=М- 1: IFM-OGOTO 


B1-100:BR2-100: 60508420: GOTO260 
РОКЕХ ,0: FOKEY ,0: N12N1 -R1: N2-2N2-R2 
-z$0281: Y-$C29E: А=%С100: М=0: D-1: GOSU 
B2340: D-0: 60701910 
SCORE DISP 


PRINTCHR$(12)1"  1UP: 


РОКЕФС100,154:РОКЕФС11С,155 


LOCATED, 15: PRINTN1;:LOCATEO , 20: PRINT 


S1-S1-B1*R1:S2-S2«B2*R2 
LOCATEO,6:PRINTS1; "0" ; :LOCATEQ,22:PR 

INTS2; "Q"; 

480 B1-0:B2-0:RET 


500 ІҒРЕЕК (Х+Х2) 65070550 
520 BEEP1:FOKEX*X2,E1: BEEPO: IFX*X2-OGOTO 
2020 
550 X1-0:GOTO100 
540 IFFEEK(Y*Y2) 6070570 
S60 BEEF1:FOKEY-Y2,E2: BEEPO: IFY*Y2-0GOTO 
2070 
570 Yi-0:GOTO110 
BONUS АСТ 

590 р=1: GBDSUB 191 の 』D= の : GBDSUB4 さ の 
600 FORI-2TOZOSTEF4:FORJ-3TO21STEPZ2 
9 РОКЕ%С1@@+1#52+1 ‚158: -— NEXT 

20 РОКЕФС100+ (RND(10) *2+ さ 2+RND (8) *4+ 
Pa で 
630 LOCATE12, 
UBZ280 
640 X2$C281:Y-2$C29E: FORI-1TO10: TCI) SO: N( 


10: PRINT'"BONUS ACT"! ° s zG0S 


F=Ø: А2=0: RESTORE34 10 
PO-USR($ZF00,0,0) :P1-USR($ZF00,0,1) 
peni :F00,0,2) : PS-USR ($3F00, 0,3) 

=USR ($3F00 0,5) : Po=USR ($ さ F の の 。 9 。 5) 
PIERCED EFPIA A а 
GOSUB1290 
Х1= ( (Р0=251) - (P2225 

Р1=254) 

720 BEEPQO 

750 Y1=((P7=247 ) - (P5= 

Ро-252) 

740 C1=PEEK(X+X1):C2=PEEK (Y+Y1) 

750 IF (C1=159) #R1 GOTO820 

760 IF(C2-159) *R2 BUTDB さ の 

770 IF(C1=15B) *R1 GOTOBA4Q 

780 IF(C2-158)*R2 GOTO870 

790 X1-X1*(C120) *R1: YI 2Y1* (C220) *R2 

800 POKEX,0:POKEY,O: X=X+X1:Y=Y+Y1 

810 POKEX,124*R1:POKEY,125*R2:GOTO560 

820 POKEX*X1,139:T1-1:G0T0910 

820 POKEY*Y1,139:T2-1:60T0910 

840 A=RND (10) :POKEX*X1,148*A: T(A*1) 2T (A+ 

1) +1 

850 Ғ-Ғ%1:1ҒҒ<796070780 

860 Ботове 

870 A=RND (10) s:POKEY+Y1 , 148+A: N (A+1) =N (A+ 

041 

BB の F-F«1:IFF«79G0T0790 


さ ) ) *32* (P12253)-( 


251) ) *32* (P52251)-( 


890 LOCATE12,10:PRINT" PERFECT! 

1 

900 GOSUB3230 

910 FORI-QTO2000: NEXT 

920 CLS: GOSUB430: FORI-1TO23: LOCATEI,17:F 
RINT "WW": : NEXT 

930 LOCATE3,4: PRINT"PLAYER- 1": LOCATE3,21 
:PRINT"FLAYER-2" 

940 ҒОКІ-0Т09:РОКЕФС1А82%1ж52,148%І 

950 POKES$CIBS*IX22,148*I:NEXT 

960 FORI-1TO10: LOCATE4*I,S:PRINT"("s$IX*10 
3 мазмұ 

970 PRINTT (1) "=" ТС) ж1910: B1-B1*T(I)*I 
980 LODCATE4+1 。 20: РКІМТ" ("3 I#10;")#"3 

990 PRINTN(ID ; "2"; NCD *1410: B2-B24N (1) жі 
: NEXT 

1000 LOCATE16,3:PRINT"TOTAL-";B1;"Q" 


1010 LOCATE16,20:FRINT"TOTAL-":B2; "0" 


1020 GOSURA60: IFA2-0GOTO10S0 

1050 IFR1 1ОСАТЕ18,2:РКІМТ"РЕКҒЕСТ10000" 
: 日 1=1 の の の 

1040 IFR2 LOCATE18,20: PFRINT"PERFECT10000 
":B2-1000 

1050 GOSUBA460:IFR1*R2 (ОСАТЕ20,25%71%17:Р 
RINT"SORRIER-32000" 

1060 IFT2THENB1-300: GOTO1080 

1070 B2-300 

1080 РОКЕ 1 , ФАА: GOSUB460: GOTO22S0 


1290 A1=A1+1: IFA1=S7THENA1 =1: RESTORE 3410 
1300 READA:FOKE1,4^: BEEP1: RET 
са КЕМ МА55 HOME 
20 FOKE1,150: GOSUE70: РОКЕ 1 , 200: GOSURS 
59 
1330 FOKE1 , 250: GOSUB370:POKE1,$AA 
1340 POEEZ(L) 。 の 
1550 Z(L)=Z (М) : M=Mー1 s TFV(L ) = テー 
1: B1=7: GOTO1 370 
1360 U2=U2+1:B2=7 
1370 IFM= ウ GOTO4 の の 
GOSUB460: IFU1*U2:10GOTO260 
GOTUS の 8 の 


2ТНЕМОі=01 + 


IFFEEK (%С000) +ҒЕЕК ($COFF) =5 15607014 


PRINT"LOADING MACHINE. " 
MLOAD:GOTO1410 
OF'T IONCMODE 1 : DIMZ (109) , V (100) ,H(11) 
,R(GL1,60) ,WC7) ,UG,7) 
1450 DIMT (10) 。N(1 の ) 。 ロ (1 の ) 
1460 FORI-$ZFOQTOS$ZFQ6:READA:FOKEI,A: МЕХ 
Т 
1470 FORI-1TOS:FORJ-1TO7:READ U(I,J):NEX 
T:NEXT 
1480 FDRI=1TD1 の : READO (1) : NEXT: POKE1, $AA 
1490 RESTOREZ66Q:FORI-2TO11:H(I?-110-I*1 
Q:READA$:FORJ-1TO6 `: 
1500 B$-MID$(4$,J,1) :RCI,J) =А5С (8%) *20:N 


1520 CLS:LOCATE9,0: PRINT" 


9 
1550 PRINT" 


1540 PRINT" 
umar. 

1550 PRINT" 
ЁЛ " 

1560 LOCATE6,7:PRINT"FOR CUPPLE PLAYERS. 
1570 LOCATE14,7:PRINT"(SCOUTING THE MASS 
) " sPRINT:PRINT 
1580 PRINT:PRINT" 
LXXXV" 

1590 ҒОКІ=0Т01000: РІСКК: IFKGOTO1790 

1600 

1610 

1620 CLS:LOCATES, 10:PRINT"*KEY re" 
1630 POKE$C24A4,124:POKE$C255,13 

1640 LOCATEB, 6: PRINT"PLAYER-1":LOCATEB, 1 
9:PRINT"PLAYER-2" 

1650 LOCATE12,10:PRINT"W";SPC(10); "I" 
1660 LOCATE13,9:PRINT"A*S";SPC(B); "Jk" 
1670 LOCATE14,10:PRINT"Z";SPC(10) ; "M" 


(C) (P) K.K SOFT MCM 


1680 LOCATE16,8:PRINT"L13(SET FOOD) L[-2" 


1690 LOCATE22,2:PRINT"FRESS ANY KEY TO G 
AME START" 

1700 FORI-OTO1000:PICEKk: IFEGOTO1 790 

1710 NEXT 

1720 REM 


1730 CLS:FORI-2TO11 
1740 LOCATEI*2,10—-(I211) :PRINTI-1;" ";H( 


I) j "Q":LOCATEI*2,20 

1750 FORJ«1TO6:PRINTCHR$ (RCI,J)): :NEXT:N 
EXT 

1760 LOCATEO,7:FRINT"TODAY'S BEST SCORER 
g” 

1770 FORI-QTO1000:FICkk: IFKGOT0177Ø 

1780 NEXT:GOTO1520 

1790 51=0:52>=0:Е:=1: 0=20: G-1 


`18@@ CLS:LOCATE11,9:PRINT"1-PLAYER GAME 


1810 LOCATE12,9:PFRINT"2-FLAYERS GAME" 
1820 LOCATE20,9:PRINT"SELECT L[SFACEJ" 
1850 LOCATE21,9:FRINT"START LRETURNJ1":4A- 
11 

1840 ҒІСКК:Аі=0: IFK-232THENA1-1: IFAzZ12THE 


pio 


Nn 1 =ー1 

1850 IFK-13GO0TO1880 

1860 LOCATEA,8: PRINT" ";:А=А+А1 

1870 LOCATEA,8: PRINT"*"::G0TO1840 

1880 К1=1:К2=1:М1=5: М2= 2 

1890 ІҒА=1 1 ТНЕМК2=0: М2=0 

1900 

1910 CLS: A=14Ø+RND (3) : FDR エニ の T ロ さ 1 : РОКЕФС 1 
20+1,А: РОКЕФСЗЕ@+І А: МЕХТ 

1920 ЕОКІ=0Т06405ТЕРЗ2: POKE$C1 40+1 , A: РОК 
E*$C15F+I,ñ 

1930 LOCATEI/32+2,1:PRINTSPC (30) : : NEXT 
1940 FORI-QTO2:FOKE$C260*1*22,1:228*I: POKE 
$C27F*I*32,131*I: NEXT 

1950 IFDTHENRET 

1960 FORI-QTOG:POKES$C141-*RND(21)*32*RND( 
30),137: BEEP 1 : BEEPO: NEXT 

1970 FORI=1T00:A=$C163+RND (19) #32+RND (26 
) 

1980 ВЕЕР 1: РОКЕА, 159:2 (І) =й: (1) =0: ВЕЕРО 
: NEXT 

1990 X-$C281:Y-$C29E:FOKEX,134*R1:FOKEY, 
135*R2 

2000 FORI-1TO5:W(I)-PEEK ($C28E+I):NEXT 
2010 LOCATE12,12:PRINT"ACT "iE 

2020 GOSURA4:30: 6050682280 

2030 ҒОКІ=1Т06: РОКЕФС286+І, М (1) : NEXT 
2040 E1=148+RND (10) : E2-148*RND (10) 

2050 IFE1-E2GOTO2040 

2060 М=0: А=МОр (Е, 10) +1: 0=0 (А) :H1-20: H2-0: 


2080 FORI-OTOS: OPTIONCMODEO: FOR コ = の TO1 の の : 
NEXT 

2090 OFTIONCMODE1:FORJ-OTO1Q00: NEXT: NEXT: 
605085270 

2100 CLS: 0508420: FORIZ1TO23:LOCATEI,17: 

РКІМТ"Ш";:МЕХТ 

2110 LOCATE3,4: PRINT"PLAYER-1":LOCATES,2 
1: FRINT"FLAYER-2" 

2120 РОКЕФС225,128:РОКЕ%С254,158 

2130 IFR1 LOCATE? A:sPRINT"s"5U153" = "01 
*100 

2140 IFRZ2 LOCATE9 , 21: PRINT": "U2; " жу 
2*100 

2150 A-U1*x10:FORI-1TOU1:EB1-210: GOSUBA60: B 
EEF1: BEEFO: NEXT 

2160 A-U2*10:FORI-1TQU2: B2-10: GOSUB460: B 
EEP1: ВЕЕР@: NEXT 1 

2170 IFU1-U2G0TO2220 А 

2180 1 ОСАТЕ 12, 2+ (02 > :U1) ж18: PRINT"WINNER 

-5000"; 

2190 IFU2-^U1THENBZ2-300: 50702210 

2200 Ві-200 

2210 GOSUBA60: FORI-OTO400: NEXT 

2220 IFR1 LOCATE15,0: PRINT"ACTBRBONUS-";E* 
1000 

2250 IFR2 LOCATE15,18: FRINT"ACTBONUS-";E 
\ 1 の の の : 

2240 B1-E*100: B2-E*100: GOSUBA60 

2250 Е=Е+1: б=6+1 : 0=0+10: IFOQ>1@@TREADY 100 
2260 IFMOD(E,:3)-O0THENFORI-QTOA4Q000: МЕХТ: G 
0т0590 

2270 U1-20:U2- 

2280 FORI-OTO4000: NEXT: GOTO1910 

2290 

2500 IF(R1= の )+H1 65070120 

2510 A-X:N1-N1-1:X-7$C281:G0T02340 

2320 IF (R2=@)+H2 65070140 

2550 A-Y:N2zN2-1:Y-2$C29E 

2340 FORI-QTOSO: OFTIONCMODEO: BEEF 1 : OPTIO 
NCMODE 1: ВЕЕР@: NEXT 

2350 FORI-1TO3:POKE1,1*80: BEEP1: РОКЕА, 13 
6: FORJ=ØT05Ø 

2360 МЕХТ:РОКЕА,0: NEXT: BEEFO 

2590 РОКЕ1,ФАА:РОКЕА,0: BUHSUB4 さ の 

2600 IF(N1-20)*R1THENA$-"1":R1-20: GOTO26:0 
2610 ІҒМ2+ (К2=0) GOTO2660 

2620 A$-"2":R2-0 У 

2620 FORI-1TO17:W(I) PEEK($C286-*I) : NEXT 

2640 і ОСАТЕ12,7:РКІМТ"РІ АУЕН-"; АФ; "GAME 

OVER" 

2650 GOSUBZS240:FORI-z1TO17:FOKE$C286-*I,W( 
I) :*NEXT: IFR1*R2-0GOTO2680 

2660 IFDTHENRET 

2670 650Т020 5 

2680 CLS:4$-"GAME IS OVER" 

2690 FORIz1TO12: IFMO0D(I,2)GOTO2720 

2700 FORJ-1TO11:LOCATEJ-1,9*I:PFRINT" "; 

2710 LOCATEJ,9*I:PRINTMID$(4A$,1,10:3 : NEXT 
:60702740 

2720 ҒОКЈ=22Тт0115ТЕР- 1:1 ОСАТЕЈ+1 9+1: РКІ 
NTM S3 

2730 LOCATEJ,?9+I:FRINTMID$(A$,I,1):; : МЕХТ 
2740 МЕХТ: 505082250 


2760 (1) =5 1 : (2) «52 д 

2770 ҒОКІғ1Т02:С1 6:1 LOCATE2,12: PRINT"PLAY 
ER-"$I 

2780 IFV(1)2H(11)G0TO2800 

2790 (ОСАТЕЗ,12:РКІМТ"ЕХТКА...": 650702990 
2800 A=2 

2810 IFH(A) <У(1260Т02850 

2820 A-4*1:GOTO2810 

2850 FORJ-11TOA*1STEP—-1:H(J)-2H(J—-1) : FORI 
1-1TO6 

2840 R(J,I1)2R(J-1,11) : NEXT: NEXT 


で つい 間違え た ん だ . それ に 手 を 洗い に 行っ た だ け だ か ら 中 まで は 行か が なく て , わか ら な か っ だ ん が だ. 女の子 の みな きる ん, ゴメ ン ナ サイ / 許 
し て 一 /( だ が 俺 は 許さ れず 、 ぼ て くり こ か され る だ ろう )  ( 俺 は 変態 じ ゃ な い 一 の BLUE-AND-BLUE 改 め ゼ ロ パ ワー 超人 「 ネ オプ ルー」) 
) 


9i0 


リリ スト 1 MASS-4 BASIC リ スト 


2850 LOCATE21,12:FPRINT"IGJ + +4CH1": LOCATE 
22,9:РКІМТ"ЕМТЕК-ГКЕТМЕМІ" 

2860 і ОСАТЕ 16, 12:РКІМТ '"^"zEND. ' 

2870 і ОСАТЕ 17,12: РКІМТ '"X"zRUB. ' 

2880 Н(А) = (І) :£FORJZ1TOÓ6:R(A,J0) 232: NEXT: 
Аі=65 

2890 LOCATE12,8:PRINT"RANE"sA-1:J-1 

2900 G-0:RESTORE3470 

2910 Р1СКК:А1=А1+(К=72)—(К=71):1РА1=51ТН 
ЕМА1-94 

2920 65050в5000 

2950 ІҒА1-9ЭТНЕМА1-22 

2940 BEEPO:LOCATE12,15*J: PRINTCHR$ (А1) { : 
ІЕК<>152560702910 

2950 IFA1-94G0T02990 

2960 ІҒА1=92% (Ј>1) THENJ2-J-1:LOCATE12,16* 
J:PRINT" ":GOTO2910 

2970 R((A,J)-A1:BEEF1:FORI1-20TO99:NEXT: ВЕ 
EFQ 

2980 J-2J-*1:IFJ«76G0T02910 

2990 FORJ-OTO1000: NEXT: NEXT: РОКЕ 1, АА: GO 
TO1730 

5000 G-G-*1:IFG-32THENG-1:RESTORE3470 
3010 READL:FOKEI1,L:FORI2-0TO20: NEXT: ВЕЕР 
1: RET 

ет RE ニー 

5050 А=Х+Х2: 6050682210: ІҒА1 =0ТНЕМВ 1 =5 ら の の 
5040 IFQ1=2THENH1=1 

5050 IFA1=4THENN 1 =N1+1 

5060 60705100 

3070 A-Y-Y2: 605085210: IFA1= の THENB つ =5 の の 
5080 IFA1-2THENH2-71 

5090 IFA1-4THENN2-N2-*1 

5100 FORIZ1TO7:UW(I) =РЕЕК C$C28C* I) : NEXT 
3110 LOCATE12,13:FORI-1TO7:PRINTCHR$ (U (ñ 
1*1,1)) 』 3s NEXT 

3120 GOSUB3260 

3130 FORI-Z1TO7:POKE$C28C-*I,W((I?:NEXT 
:2140 ІҒА1-560Т02080 


Жу 


あな た だ は 怪盗 ルパン で す .。 ホー ムズ に 捕 


ま ら な いよ うに し て 逃げ 回 っ だ たり, 味方 を 
助け て 宝 を 盗み 出し て くだ さい. 
遊び 方 T 

[1 3] で 左右 に 逃げ 回 っ て くだ さい . BE 
1 の よう な と き は , 建物 で ルパン は 捕まり 
ませ ん が 。 も し 左 か ら ホ ー ム ズ の 部 下 が 重 
な っ だ た とき が ルッ パン の 最後 で す . ルパン が 
+ 較 で も 捕まる に 上 ゲー ム ・ オ ーー で す 。 

し か し , [@| で 建物 を くぐり 抜け , [| で 
壊す こと が で きる の で , 建物 を うま くく 使っ 
て ホー ムズ の 部 下 か ら 6 逃げ まし ょ 2 う . 左 へ 
左 へ と 進ん で いく と, ホー ムズ の 事務 所 に 
着き ます . | 

する と, 壁 の 前 に ホー ムズ が 侍 ち 伏せ し 


PC の USER の みな さん . TACOS PLAY し まし た か ? 面白 いす ね ェ ー. 
9 面目 は HATTORI, な ん と 15 面 目 は PiO を モチ ー フ と し て 画面 に な っ て いる ん で す よ . この ご ろ PC の GAME は グラ フィ ッ ク に 凝っ て ます 
ね ェ ー. や っ ぱり PC は 使い や すい で すね ェ . あの 頑丈 な キャ キーボード, あの 配色 、 そ し て あの キー タッ チ . PC-8801mkIISR を みて くだ さき さい. 
長 っ た らし い 名 前 。 デ ィ ッ プス イッ チ や や こし いで すね ェ ー. PC を 見 て くだ さい , 基板 1 枚 で す よ . SIMPLE is BEST /PC バ ン ザ ー イ 


3150 0-0:608UB420: ІҒА1< >160Т050 
3160 IFA-X*X2THENA-E1:GOTOZ1809 
3170 A-E2 

5180 FORI=ØT049 | 

5190 A1=$C141+RND (21) #32+RND (50) : ІҒРЕЕК ( 
А1) GOTO3190 

3200 РОКЕ1,1+100: BEEP 1 : POKEA1 , A: BEEPO: NE 
ХТ:РОКЕ1,%АА: 6507050 

2210 A1-RND(5):FPOKEA,142*A1:RET 

5220 REM---------- MUSIC 

3230 RESTDRE さ 5 1 の : GBDTD さ 29 の 

2240 RESTORE3530: 650705290 

5250 RESTURE さ 357 の: BDTD さ 29 の 

2260 RESTURE さ 6 の: 50705290 

2270 RESTORE3620:GO0TO3290 

2280 RESTDRE さ 64 の 

3290 READI:FOKES$CSOB,$EQ:FORI1-1TOI 

3200 READM1,M2,MZ:POKES$CB8Q04,M1:FOKE$C8Q5 
‚м2 

ささ 1 の FORJ=QTOMS: NEXT: NEXT: FOKE$CSOR , O: RE 
3320 REM--------- -DATAS 

3330 DATA182,200,1,182,200,0,57 

3340 DATA42,656,79,78,85,83,42 

3350 DATA82,657,65,84,84,69,82 

3360 рАТА42,72,85,76,75,55,42 

5570 DATA77,73,82,65,67,76,69 

3380 DAT469,88,84,69,78,68,33 

3390 DATA$CiAA,$C26E,$Ci5E,$C136,9CZAE 
3400 DATAS$CZSAF,$C14F,$C39C,$C3C5,9C1ó52 
3410 DATA150,150,200,200,250,250,255,255 
5420 DATA150,200,250,255,250,0,0,0 

3430 DATA150,150,200,200,250,250,255,255 
5440 рАТА150,200,250,150,100,0,0,0 

3450 DATA200,0,250,0,150,0,100,0 

3460 рАТА200,0,250,0,150,0,80,0,80,80,80 
:80,0,0,0,0 

5470 рАТА140,200,150,100,120,140,120,200 


саво DATA4140,200,120,100,120,140,120,200 
І)ЛАК2 MASS-4 キャ ラク タ ・ デ ー + шан 


て いま す 。. 図 2 の よう に ホ | 
いて いる と き に , すか る きず |Al で アタ ッ 
ク ク う まく いく と ホー ムズ は ム ニ ュ ム ニ ュ 
と 眠っ て し まい , その まま [IDp| で 壁 を 壊し 
て 部 下 を 助け て くだ る さい. 

その 後 , その まま 興 へ 興 へ と 進ん で 宝 を 
表し 出し て くだ きい .。 し か し , 部 下 を 連れ 

図 1 ゲー ム 画 面 例 1 


ГА 


ー ム ズ が 左 を 向 | て いじ る の で ゆっ くり し て いる と , ホー ムズ 


2490 DAQTA1 4 。 1 4 の 。 1 さ の 。 1 2 の 。 1 4 の 。 1 4 の 。 つの の 。 2 の の 
3500 DATA14 の 2 の の , 1 さ の 。 1 の 。 9 の 。 1 の , 1 の の 。 の 
3510 DATA 7。$55 。 さ 。 さ の の 。 $55 。 3, 3 の 。 も 4 。 2 。 さ の 
9 , $A4, 2, 300 

3520 DATAS$7E,2, 300, 538,2, 300, 04,2, 0 
5520 DATA14,$944,2,200,$54,2,100,9:28,2,20 
Q,$F5,1,100 

3540 рБАТАФС2,1,2500,%58,2,200,%С2,1,100,% 
FA 。 1 。 さ の の 

3550 DATA$5A4,2,200,9FA,1,100,954,2,300 
3560 DATA$F7,2,200,$54,2,100,944,2,500 
3570 DATA10,$DD,1,600,$9F4,1,100,€DD,1,10 
Ø,$A9, 1,400 
3580 DATA$18,2,400,$9DD,1,400,9$18,2,150,$ 
DD 。 1 ,15 の 

5590 D4TA$18,2,150,938,2,600 

3600 DATA 6,$938,2,100,$9:28,2,100,$28,2,10 
o " 

5610 DATASFA,1,200,9FA,1,100,$C2,1,200 
3620 DATA 7,%7А,1,100,%74,1,50,%55,1,50 
5650 DATA$51,1,150,9:E,1,50,97E,2,50,$7E 
,2,50 

3640 DATA 9,$04,2,100,$954,2,50,$954,2,100 
,$CD,2,50 

35850 DATA$4A4,2,100,944,2,50,9:28,2,100,$5 
8,2,50,%44,2,200 

3660 DATA" Ф! 11", "O; &/X1","—4*,*Q","$75 
6'4" 

3670 DATA"/1*',*","4M::10", "50#+45" 

5080 DATA"$8..'6","9«c44&" , "45 S& а” 

5690 REM 

3700 REM  "MASS"SERIES PART-4 

3710 REM [SCOUTING THE MASSI 

3720 REM PROG. BY K. KOYAMA 

3730 REM THANKS TO MR."MOHEJI" 

5740 REM (С) (Р) К.К SOFT 

3750 REM. MCMLXXXV (1985) 

3760 3/1017 (ND. 62) 


18. 10: AC 
3C 18:54 
28 Có:36 
38 10:3C 
FE 7C:48 
10 58:45 
02 00:78 


ЕВ 79:F1 
56 


ーーーー --- ーー ーーーーーーーーーーーーーーーー — — — i n — кә» — Е n — — — ч 


SHPEZLZIT. ЖОШ TL ks 


表 1 キャ ラク タ 


ルパン 


ホー ムズ 


ルパン の 部 下 


お も わ ず 熱 中 し て し まい まし た . そし て 画面 が 凝っ て ます ね ェ ー. 


7C 38:8B. 


% 


PASOPIA 


М 
ン 語 (T- BASIC Ver 1 t) 


Lo 


ANA 


人 で たん とら 6ODIBGO と CAPCOWM の ふ あ ん ` А2 


PASOPIA に は あま り 見 か け な い 4 方 向 追 
いか け ゲ ー ム が や っ と 完成 し まし た . この 
ゲー ム は , な ん と フル ー ツ 43 種 類 , 面 数 は 
ウッ トイ の 半分 の 50 面 も あり ます . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 
—+< BASIC コン スト ラク ショ ン 用 


マシ ン 語 A000—DIBF 
スタ ー ト A000 


黄色 い 声 で 相手 を や っ つけ る な ん て 
よく 考え つき まし た ね . その 他 に も 
と て も よく 考え られ た , アイ デア い 
っ ぱい の ゲー ム で す . (V) 


入力 実行 の 


マシ ン 語 は PiO, I/O な どの モニ タ で て 入 
カド て な が る あい 、 ANnSWALETSeS* 
ク ・ サ ム を よく 調べ て から, BSAVE#ー 1, 
"CATHEY",&HAOOO,&H31BF C + — 7 
し て くだ る あい) BASED ART ANT» 
ョ ン な の で 入力 し な 〈 く て も 構い ませ ん . 

A= &HAOOO:CALL Al RETURN |T ゲ 
の が 絡ま TAT Ұмы, カナ モー ド に し 
Cio E EM 0 Ex. 


そ キャ ラク タ の 性 格 ・ 


CATHEY : ずばり , あな だ の 分 身 で す . 
[sl4]l2][e| で 動か し [SPACE | で 黄色 い 
声 を 出し , 敵 を 殺し て くだ きい. 
YATTUN : こ や つ は 敵 で , 左右 へ 行っ た 
り 来 だ か まる 玉 け の どう し よう を な いや つ 
тт; 
ROUTEN: 2 Фо ь С, くる くる と 回 
を る やつ で す 。 し か し 地形 に よっ て ば 上下 。 
左右 に の み 移 動 す る こと が あり ます . 
НІ-ТАКО : これ も 敵 で す . 追い か け と 乱 
数 の 混血 タコ な の で , だ た ま に と ろり い 方向 へ 
зі? ib, 気 に せ ず に / 
GOHDAN : これ に は 立ち 向かえ を ませ ん . 
声 を 無視 し て 追い か け て きま す . これ は 敵 
が アク マ か 新鮮 フル ンー ツ ( ば こ ば ぱこ と 点 減 
し て いる や つ ) に きわ る と 変化 し ます . し 


か し , 一 定時 間 だ つと 元 に 戻り ます . 
KEY FRUIT: その 名 の と お り , カギ の 
フル ー ツ で す . その 面 の 初め に 音楽 !17 と と 
も に フル ー ツ が 表示 る れ て いま す . ゲー ム 
中 に その フル ー ツ を 取っ だ た ら , ドア ま て 道 
草 せ ず に 行こ う 、 そ うす る と ドア が 開き , 
中 へ 入っ て 1 面 終了 で す . 

FRUIT : 得 点 の み の フ ルー ツ で す . で き 
る だ け 全 部 取っ て 高 得点 / 

MAGIC FRUIT : 8 種類 あり ます . 
DOOR: キー フル ー ツ を 持っ て いる と き の 
み 開 く , 堅固 な ドア で す . 

MOTONOAJI : 魔法 の 薬 で , これ を 取る と 
画面 上 の 敵 が すべ で て ROUTEN に 変わ り ま . 
す . 

MIRACLE : キー フル ー ツ と 同じ 役割 を し 
ET. 

CATHEY : CATHEY を 1 人 増やす あり が 
た い フ ルー ツ で す . 

BOMB : これ を 取る と , 1 人 死に ます . 
POWER : バ パワー を 3 つ 取 る と , 声 の 動き 
が 活発 に な り ま す . だ だ し 死ぬ と 。 元 に 戻 
り あま す 。 

OTOO: これ は , 取っ だ パワ ー の 数 を 1 つ 
減ら し ます . パパ ワー が 0 の と き は パワ ー は 
ー1 と な り ま す 。 

AKUMA : これ を 触っ た 敵 は 皆 GOHDAN に 
変わ り ま す . AA UN < 
と 消え ませ ん 。 


コン スト ドラ フシ ョ ン に 


лала ҰҰалалаа 


カー ン ル を [sl4][2][6| で 動か し て , 
| SPACE |+ — c, [Dp| で 訂正 , [MI で 人 
を 置く , |5| で 敵 を 置く , | 回 で その 面 終 
了 、[M で テー プ に セー ブ し ます . ちな み 
с, その 面 の 敵 の 数 は メモ リ の ある 限り 増 
や せま す . た だ し , デー タ ・ ア ドレ ス が F 
000H を こえ ぇ える と , FOO00H よ り 後 は 壊れ ま 
+, 

ұз, 必ず ゲー ム 本 体 を ロー ド し て か ら 
始め て で だ る さい. 


ソリ ジラ の に 


A000H ~ AFFFH2!53 4 X ° v— * ZC 


T. この ゲー ム は 私 に と っ て 初め て の ォ ー 
ル ・ マ シン 語 で す . 音 が 出る と き 少 し 動き 


が 止ま っ て し まい まし た . 


困 つ だ も の だ 
エイ エキ テイ ャ アイマ マ マイ ャ リャ マコ 


この ゲー ム に は 最大 の BUG が あり ます . 
同じ 所 に 2 つの フル ー ツ が 重なる と , 一 方 
が 無視 8 きれ て し まい ます 。 も し どう し て も 
フル ー ツ を 取り だ か っ だら , 1 つ 取 っ て か 
ら 6 死ぬ と も う 1 つ 取れ ます . どう も すい ま 


別れ る 前 に 


この ゲー ム は, 1 年 以上 前 に CATHEY 
と いう 歌 を 聞い て いた ら 思 いつ いた ゲー ム ` 
t4. | 

書き 忘れ まし だ た が, どう し て も 面 を 終了 
する こと が で き な か っ た だ ら , [ESC | 
し て くだ るい. CATHEY が 身代わり に な 
っ て その 面 を も う 一 度 や り 直 すこ と が で き 
RU 
P.S.: ま だ ゴダイゴ の 歌 の タイ トル の ゲー 
ム は あと 4 一 5 個 あ る の で す が , 大 学 入試 が 
ある の で , で きた だ ら 来 年 に で も 発表 し たい 
と 思い ます 。 INTERMISSION 


GODIEGO FINAL LIVE 十 2 は よかっ だ で 
すね ぁみ 一 
キー フル ー ツ を 持っ て いる 瑞 は どれ 2? 


(流石 の PC) 


リス ト 1 CATHEY マシ ン 語 リス ト  ц(цЦ( );(( 777 
6D AE.CD 72 


ре ра ЕС 


+5 
AA 
AC 
o1 
ЗЕ 


8 月 号 p.150 の PiOPiO の 「 昔 …」 ド タン ク さ ん へ . PiO は イラ スト 関係 の 本 で は あり ませ ん (少な く と も 現時 点 で は . e, や ば い /) oc, 
そん な 言い 方 を し な いで く 《 く ださい. モン ス や デッサン 力 に 関係 な くみ ん な が 楽し ん で 描け り れ ば 良い ,。 と 私 は 思っ て ます 。 反論 待ち ます 。 
PS. 言葉 づか いで , 育ち が 判っ て し まい ます よ 。 ・ (Narkham) 


pi 


リス ト 1 CATHEY マシ ン 語 リス ト 


оо 760 
оо оо 
79 70 
70 70 
7а 760 
eo 79 
oo 76 
79 70 
76 768 
76 70 
оо oo 


pio 


リリ スト 1 CATHEY マシ ン 語 リス ト 


E350 ОО ҒО FO FO FO FO FO ҒӘ @@ FF FO FF FF ёб OO FF :7C B820 22 до од до OO O2 20 20 22 22 22 02 20 00 02 OO :EE 
B360 の の FF ӨӨ 00 FF ОҒ OF FF 9 の 9 FO FO FO FO FO FO FO :AB B830 22 22 20 22 20 20 の の 20 20 o0 00 OO 20 20 02 02 :ДА 
E370 ӨО FF ҒӘ ҒО FO FF FF FF Од FF ОО o0 00 OO OO FF :CAÀ B840 の の 00.02 の 2 22 22 22 22 の の 22 22 22 22 02 02 22 156 
B3806 оо @@ FO FO FO ҒО FO 99 ӨО OF OF OF OF OO OF OF ia B850 оо оо 20 20 22 OZ 02 22 фо дө OO OO OO OO OO 22 :AA 
B390 @@ FF FF FF ҒО 00 FO FO 00 ҒО FO OG 99 OO OO OO : Ар B860 02 の 9 оо оо O2 02 20 20 22 22 02 22 02 02 бө 92 :B4 
BZAO ee FF ҒО FO FF ҒО FF FF ӨО FF OF OF FF ОҒ OF FF :05 B870 22 22 22 20 02 00 20 90 22 00 00 の 2 02 20 00 00 :ЕЕ 
B3BO O0 00 FO FO OO FO FO の 9 OO FO FO OF GO OF FF FF! : BC B880 の の оо 02 02 22 22 22 22 00 22 22 22 22 02 92 22 1340 
EBSCO оо оо 90 OF FO OF 00 の 9 00 FO FO OO OO OO FO FO :CE B890 оо оо 20 20 22 O02 02 22 оо 00 бө OO 00 OO 00 22 AA 
B3DO 44 44 24 22 22 22 20 00 44 24 22 22 22 の 2 22 00 124 B8Ae6 02 02 оо оо бө O2 о? 20 22 22 22 02 22 02 Өз бө :В6 
B3EO 44 44 44 22 22 20 бө од 44 42 22 22 22 02 22 00 :40 BBBO 22 22 22 20 20 02 бө 20 22 бө өө OO OO өдө 20 92 : ӨС 
B3FO 44 42 42 22 22 22 22 20 44 44 24 22 22.22 00 дө :82 BBCO оо оо 90 O7 97 07 07 OO 97 77 72 27 27 27 72 77 6А 
Verses en n ies vn di Gd uu ui og imi ت‎ my ts a d eio ت ت‎ n om t кы in m mtm piv iere ше ut жіне ioa Em imeem DEDO 77:27:72 77.27.72 77.27 00.70.77 27 TRAT 27.27 9088 
биті CC А2 39 04 11 20 FE E9 CC 53 25 71 41 32 АҒ C8 102 BBEO до OO OO OO оо OO OO OO O7 OO 30 30 55 55 бө OO :CD 


—À — —À — — — — — — — — — — — — — — — — — — — — — — — a — — i‏ س —À‏ س س 


B420 07 07 72 72 өө 60 ов өө 55 22 22 22 өө 97 79 60 :ЕА NAD. ADAL 2 у EOE t6 o7 99 5 Boc ДЫРДЫ ЭР бәп 
Bé40. до 03 03 95 ӨЗ ӨЗ ӨЗ OO 353 52 35 77 77 77 $7 55 zBB || E910 77 27.72.27 27 77 77 22.00 TO 77 27 27.27 27 77 WEM 
B45 の 33 25 22 73 77 75 55 57 Өө 30 30 33 33 33 55 3% FO B920 の の өө QQ оо GO оо оо өө өт өө OO OO өз ӨЗ 55 33 :73 
B460 の の оо өт 02 O0 оо өө дь 55 22 22 22 өө 70 60 69 F5 B936 77 77 60 63 63 60 оо өө 70 00 өө зо зө зө зө өө :A4 
B47 の 57 75 75 55 70 07 96 6&0 зө өө оо 20 оо 50 ӘӘ 00 :2z В940 00 07 77 72 77 77 72 72 77 72 27 77 72 27 77 72 :СВ 
B480 оо өз өз өз өз ӨЗ 07 07 33 32 23 37 77 77 57 55 :76 Beso. 70.77.27 72 72 72.27 77. ӨФӨ 00 00 79 70 70 70 ӨӨ pg 
B49 の 33 23 32 73 77 77 75 55 өө 30 30 ЗӨ зө зө 70 70 :83 В950 07 00. 00 00 00.00 00 00 27 77 06 06 36 36 55 55 183 
B4AO өз өө өө 02 өө の の өө өө 55 22 22 22 07 07 Öb © :DA реге -70.00 ӨЗ ӨЗ 33 55 вө の の QQ O9 90 00 ФО 00 90 dO (DC 
B4B の 55 22 22 22 60 60 өө の の 70 70 өө 20 OO ФО өө өө :7B 89%0 00:97 77 72 72 72 72 77 77. 72.27 T2 72 77 77 22 аб 
Pe 3253 52:73 77-77 75 55:90 36 3e 3e Ce 3e TO 7€ «Өз |) РУЮ е7 89 909 03 93 95 95 98-77 77 Ob 56 38 96 SD PQ 17% 
В4ЕФ 07 07 00 ©2 OO өө 00 өө 55 22 22 22 05 Øb 60 өө :D7 B9BO 70 00 00 00 30 50 55.55 00 00 OO OO OO OO OO OO :56 
B4FO 55 22 22 22 70 70 60 60 50 өө 00 20 00 00 өө 0© :АВ RPCO 89 00.07 67-07 97 99-80 97.77 77 07:87 77 7797 418 


—— — — s O Ra 


B530 55 22 22 22 の の 70 07 дь 70 70 27 27 дө дь 69 до :CC BAoo oo оо 07 07 07 07 00 07 07 77 77 97 87 77 77 07 :1B 
B540 00 ӨЗ ӨЗ 33 33 55 33 33 55 32 23 37 77 37 55 75 :3С BALO: 70 77 77 97,07 77.77 70 90 00 70 79 70 70. 00 90. 18A 
B550 33 23 33 77 77 77 75 55 o0 30 30 509 зө зо 50 бо 8 BAZO 70 70 O0 OO OO OO OO OO 77 097 97 07 00 OO бө 97 :73 
B560 ӨЗ の の の の 02 өө O5 өө өө 75 27 27 22 07 70 60 O6 :CD BAJO 70 77 79 77 77 97 70 00 70 07 97 00 өө 00 00 ӨӨ :ЗА 
B580 оо оо ос оз өз өз оз оз оз 33 33 53 23 33 xx 33 :7A BASO 70 77 77 70 79 77 77 70 00 00 70 79 70 70 00 00 :5С 
B590 509 55 ささ 55 35 さる 33 53 の の 00 IO ЗӨ 50 50 ЗӨ る の :B5 Вабо 70 72 оо oO 07 07 78 79 77 97 97 77 77 ӨӨ бө GO :41 
ро Өз 07 Pb $2 60 も の 00 80 T5 25 20 2O ФЬ оь өр do (B2 || Э^ге 79 77 79 70 90 ӨӨ ӨЗ 99 76 07.97 09 90 00 06 WP 109 
pibe Mua жа як ӨС өз dt өз MEO SE Уз 58 $5 385 E (YA || AUS. 7877 77 70 7% 77-77 T9 99 99 TO 78 79 VO UD лр БЕ 
В5ЕФ ОЗ ӨО 00 02 00 өө өө өө 33 23 22 22 07 97 00 Ob :B9 BABO 77 79-79 70 90.99 90-70 97 97 90 00 00 .90:90 v9 tu 


——— —— —— — — — — — — —À — — —À — — —À — — —— — — کے‎ — — — —— — — — — —— — — — — — — — — ———À — — — ————————— 


Бо20 Qo Фо の の бе өө OO OO OO OO оо өө OO өө OO OO OO :oo || Add +0 +1 +2 +3 44 +5 +6 +7 48 49 +A «B +C +D +E *F Sum 
B630 өө 60 GO оо өө өө OO OO OO OO OO OO Фә OO оо OO :oo || ВВФФ 50 00 00 50 ӨЗ ӨЗ 57 75 00 50 ӨӨ 55 52 55 77 72 121 
Bé40 QO ӨО 90 оа 44 46 44 44 O4 44 46-44 44 44 44 4ваға || BB10 SO OO O0 53 25 32 75-77. 05 00 50 00 ӨЗ 50 70 37 AES 
BASO 44 44 44 44 44 24 42 22 өө 40 4 の 44 64 44 24 44 ibo || 98209 75 75 97 OO ӨӨ 02 00 Ф0 72 57.22 27 27 27 06 96 t5B 
$650 42-44 04 04 00 00 00 00 4422 42 Өр 02.02 ӨЗ ӨЗ r40 || 5030 75 55 22.72 72 72 60-640 37 57-79 30 60-20 99 Ф0-1-40 
B670 24 24 20 20 20 20 20 20 40 40 өө өө өө OO өө OO :88 BB49 00 00 07 07 07 ӨӨ 00 00 QQ 00 70 56 66 26 62 62 :5В 
BABO до の 6 66 66 66 дь 06 00 GO өө 60 OO ьо өө OO оь :AA Зо. 00:00:06: 46.67 26. 27087 `07гто 60.00. 90 00700 PO; 
воо の の өө の の өө 00 өө OO өө OO OO өө OO өө OO OO OO 100 || ВВ60 OO 00 OO O6 06 оз O7 те 22 22 22 ть 67 90 00 00 :7D 
BéA® oo оо оо өө OO OO OO OO 66 O5 O6 O5 OO OO OO OO :78 BB70 26 26 62 67 77 77 00 өө 70 өө өө 70 70 79 00 EO 1C3 
BoB の 66 O06 00 の の OG ов OO OO OO OO OO OO OO ов OO OO :DB8 Wage 79 97.07. 00.:00 0609-090 906.90 90:60 87.66 62.092 @2,s11 
BACO 05 05 05 44 44 44 44 44 54 44 54 44 44 44 44 44 :A3 || ВВ90 OO 00 00 07 67 66 26 22 00 00 00 70 70 oO 00 OO іҒС 
BoDo 40 55 45 55 44 44 44 44 00 の の OO 40 40 44 44 44 :BB ВВАФ 00 00 00 07 07 оо 00 00 62 bb 76 07 өө өө 00 өд :53 
BEO 44 44 O0 44 44 04 54 ささ 44 44 дё 44 44 44 44 до :13 BBBO 22.20 66 66 06 90-00 00 60 00 00-70 70 70.70 07 1рВ 
B6F の 44 40 00 44 44 44 44 ӨЗ 44 44 44 44 4 の 40 30 ЗӨ :87 BBCO 00 02 02 22 22 20 20 20 22 20 20 00 00 90 00 O5 :0F 
жыбыр А ЛИНЬ Жы IRN ыыы ыны dle: Rm BBD 22 ©5 95 55 55 50 50 50 22 go6 ФЬ 5e 50 50 5o 55 :89 


А 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


Add +0 +1 +2 «3 +4 45 *6 +7 +8 +9 +A +B +C +D +E +F Sum 
ввоо оо OO OO оо OO OO OO 22 оо OO от 22 22 20 20 22 :CA 
B810 00 22 22 22 22 20 20 22 00 00 20 20 22 22 22 22 :B2 


やり ま すね ぇ . ソノ シー ト に ポケ コン の プロ グラ ム が 入る と き が つい に きた ん で すね . や ぁ , 感動 ど な あ . 僕 の クラ ス に は ぷぷ ソ ユン を 持っ 
て いる 人 が 多く 〈, 彼ら が 僕 が ポケ コン を 持っ て いる こと を 知る と ,「 ポ ケ ュ ン て 一 体 何 の 役 に 立つ の ? 」,「 そ ん な 物 に 何 万 円 も 出し た の ? ちょ 
o*—.,; と 言わ れ て 何 も 言 を な く な っ て し まっ だ. PS. 間 上 ら ぼ さん の イラ スト を 他 誌 で 見 て ,「 あ ー. 裏切り 者 だ .」 と 思っ た の は 。 fX 
だ け で し ょ うか (別に 悪く 言っ て いる わけ で は あり ませ ん ). | | | (ば か や ろ 一 ) 


. 


« ғ à 


pu 


リス ト 1 CATHEY マシ ン 語 リス ト ° 


pio 


リス トイ 1 CATHEY マシ ン 語 リス ト 
oo oo, оо оо 


CAFO 22 


Add 

C700 
C710 
C720 
C730 
C740 
C750 
C760 
C770 
C780 
C790 
C760 
C7B6 


CC® 
CC7e 
ccseo 
CC9@9 
CCAG 


わーい TiO さ きん あり が と う . ノ ルン ナ は 今 , と っ て も 嬉し い の で す . だ っ て , 3 箇月 も 連続 し て イラ スト 載せ て も ら え だ ん だ も ん 特に 7 月 の 
イラ スト は , な ん ほ と 5 月 号 に 載っ だ の と いっ し ょ に 送っ た ん で す よ ね 滑 ホ ント ぴっ くり し まし た . と ころ で , 今 い を が し く て , あん まり PiO 
に イラ スト が 送れ な いし ,。 プロ グラ ム も idea ど まり な ん で すみ ゥ (いそ が し る は サー クル 活動 の せい だ か ら . 文句 が いえ な い の で すけ れ ど …). 


P.S. I 先生 . た だ で コピ ー し て くれ て あり が と う ご ざ いま す . それ か ら F 先 生 。 な な この 哀 料 か し て ね /(F 先 生 は 早稲 田 を 出 た 英語 の 先生 


100 КЕМЕ ЭЗЕ 3c 3€ Jc € 3€ ЭЕ Jc 3c J€ € ЭЕ ЭЕ € J€ E 3€ € € € J€ 9e 9€ 9€ ЗЕ ЗЕ 

116 REM*  CATHEY Ver 2.5 for РАСОРТА ж 

120 REM* 

150 REM* コンマ トラ の ショー program 

140 REM* (C)1985 by 

150 REM* zt*rLn"-h"GODIEGO & CAPCOM ファ 

160 REME HH 3 3 3 JC € € € E 3 € 3€ 3€ 9€ 3€ € ЭЕ ЭЕ Je J J € € € € € 9€ 3€ 9 

176 WIDTH 36:SCREEN 6: COLOR A4:CLS 

180 CLEAR .&H9FFF:DEFINT A-Z 

190 DIM. M(15,112,T(3,90) ,F$ (42) , T@ (2) 

200 FOR І-Ф TO 42:READ ЕФ (1) : МЕХТ 

216 FOR Ісо TO 2:КЕАр T$(I):NEXT 

220 DATA К К/Т” ,5978% ‚Феу 

WA а ecu. d 7 。 アフ マ ҰТА アイ 

2356 DATA ヌィ |, 404 M e om М トマト өлен; 

P «A ua .bh?tna3»s,t-* y 94 

249 DATA 442 و‎ a 237246 プラ 

i «Те?» : „ PE дай addis ДЫ; to с 

250 DATA FD ;^ $ , ۴3 Ат ,уулх 
52-29 «НЕ 2 a 29071  。 フ ウ セ ンス 70? Wh 

250 DATA DIT ‚992° 427 

270 DATA Tw*1»,04-72,ü0?7» 

286 ADR-£HCS83F:STAGE-1 

290 IF PEEK(ADR-1)-0 AND РЕЕК (ADR) =255 T 

HEN FRINT USING"4448 — &  Á £"iSTAGE:HEX$(A 

DR):STAGE-STAGE-*1: ° 2/%--7 Э A012H,13H 

= カキ コム ト AFT メン カラ 7-4 カテ "キッ マス 。 (A018H - 

ステー ズ ウ 9? パイ レル コト ) 

ふ 399 IF NOT (РЕЕК (ADR) =4 AND РЕЕК ‹А”К- 1) = の 

) THEN ADR-ADR*1:GOTO 290 

316 FOR I=@ TO 15:FOR J=@ TO 11』M(T。J) = の 

фҘМЕХТ J,1 

320 FOR I=@ TO 15:М(1,9) =1:М(1,11) =1: МЕХ 

1 

330 FOR I=@ TO 11:М(9,1) =1:М(15,1) =1: МЕХ 

T 

540 CLS: PRINT " ННН ' 

うら の FOR Ісі TO 10:FRINT"M 8 

":МЕХТ 

5609 РКІМТ" ННН 

376 FOR I-ó TO 2:РКІМТ СНК%(249)::РКІМТ 

USING" $ UV" T$OI)$ МЕХТ 


386 PRINT:FOR I=@ TO 42:PRINT CHR$ (249); 


:FRINT USING" & &"SFSCI)S:NEXT 
599 LOCATE 16,1:РКІМТ" Av А с フル ー リ 


499 LOCATE 16,0:FRINT USING"ADR:& % ST: 
###";HEX$ (ADR) : STAGE; 


07 ое 2A 


410 Х=1:Ү=1:1 ОР=0: МХ=0: МҮ-Ө: HIGH-2 
429 LOCATE X,Y:4$-INFUT$(1) 
430 IF A$-"4" AND X51 THEN X-X-1 ELSE 
АФ-"6" AND X414 THEN X=X+1 
446 IF A$-"8" AND Ү>1 THEN Y-Y-1 ELSE IF 
АФ-"2" AND Y ぶ 1 の 6 THEN Y=Y+1 
450 IF A$-" " THEN M(X,Y)-21:FRINT"RB": 
460 IF A$-"D" THEN М(Х, У) =0:РКІМТ" "j 
479 IF A$-"M" AND M(X。Y)= の 9 THEN МХ=Х: MY= 
Ү:РКІМТ "Ф"; 
480 IF A$-"E" THEN 700 
499 IF A$-"S" AND M(X。Y)= の THEN 520 
500 IF A$-"W" THEN 919 
519 GOTO 426 
520 IF LUP=99 THEN 420 
550 T(O,LOF)-X: T(1,LOPF) -Ү:РКІМТ CHR$ (65+ 
СОР); 
540 XX-0 
XX12XX:LOCATE ХХ,12:РКІМТ CHR$ (255); 
A$-INKEY$:IF A$="" THEN 560 
IF A$=" " THEN T(2,LOP) -ХХ/19:60Т0 6 


IF АФ="4" THEN XX-XX-10 ELSE IF A$-" 
6" THEN XX=XX+19 
590 IF XX<@ THEN ХХ=20 ELSE IF XX>29 THE 
N XX=@ 
666 LOCATE XX1,12:PRINT CHR$(249)::GOTO 
550 
619 GOSUB 1600:T(3,LOP) =AA 
620 LOCATE 16,HIGH:PRINT CHR$(&65*LOP); 
636 PRINT USING":WAÀ 44 &£  & & ЖҰТА) 
šT$*$(T(2,LOP))šsF$(T(S,LOP)) : 
640 LOP-LOF*1:HIGH-HIGH*1:IF HIGH-12 THE 
N HIGH=2 
550 FOR I=9 TO 26 STEF 16:LOCATE I,12:PR 
INT CHR$(249) : NEXT 
666 FOR Ј=15 TO 23:FO0R I=@ TO 27 STEF 9 
676 LOCATE I,J:PRINT CHR$(249); 
686 NEXT:NEXT 
696 GOTO 420 
766 GOSUB 1000:KF=AA 
719 FOR 1=@ TO 11 
726 J-6:GOSUB 840:J-8:GOSUB 840 
750 NEXT 
746 FOKE ADR ,МХ:РОКЕ ADR+1 „MY 
756 POKE ADR*2,KF:POKE ADR+3, LOP: ADR=ADR 
+4 
760 FOR I-6 TO LOP-1 


PG 


リス ト 1 CATHEY マシ ン 語 リス ト 


779 POKE ADR  。T(@。I)*16+T(1。1) 

780 POKE ADR+1,T (2. 1) *64+T( さ 。1 ) 

796 ADR=ADR+2: NEXT 

866 FOKE ADR, о: ADR=ADR+1: STAGE=STAGE+ 1 
810 LOCATE 16,0:PRINT "DATA ADR ":HEX$(À 
DR); 

820 LOCATE @,2Z:FRINT "PUSH ANY KEY"; 
830 IF ІМКЕҮФ="" THEN 820 ELSE CLS: GOTO 
310 

840 B=@:FOR 1-7 TO Ө STEP -1 

850 IF M(J,I)=1 THEN B=B+2^L 

860 J-J*1:NEXT 

870 FOKE ADR, В: ADR=ADR+1 : RETURN 

880 LOCATE 06,23:PRINT SFC (20): 

890 LOCATE Ф, 25: РКІМТ P$::RETURN 

900 IF А<9 THEN 886 ELSE RETURN 

916 CLS:LOCATE 5,5 

920 PRINT"SAVE OK ! (OK-LRETI) "::4$-INF 
UT$ (1) 

9360 SIZE-ADR-&HAe00-42: START-£HA6O00 / 
940 LOCATE 4,7:PRINT " STAGE "%5ТА 
GE 

950 POKE ADR,O:POKE ADR*1,6 

960 LOCATE 4,8:PRINT "SAVE ADDRESS ":HEX 
$ (START) 

970 LOCATE 4,9:PRINT " SIZE "SHEX 
$ (SIZE) 

986 BSAVE 4-1,"CATHEY",START,SIZE 

999 GOTO 820 

1000 XX=@: YY=13 

1010 XX1=XX:YY1=YY:LOCATE ХХ.ҮҮ:РБІМТ CH 
КФ (253); 

1020 A$=INKEY$:IF A$="" THEN 1020 

1030 IF АФ-" " THEN AAzXX/9*(YY-12) #4: RE 
TURN 

1940 IF АФ-"4" THEN XX-XX-9 ELSE IF A$=" 
6" THEN XX=XX+9 

1950 IF АФ-"В" THEN YY-YY-1 ELSE IF АФ-" 
2" THEN YY=YY+1 

1660 IF XX«0 THEN XX-27 ELSE IF XX>27 ТН 
EN ХХ-о 
1970 IF 
HEN YY- ік. 
1980 LOCATE XX1,YY1:PRINT CHR$(249)::GOT 
O 1010 


<13 THEN YY=23 ELSE IF ҮҮ>22 T 


ХХХ Ееее е қа ха Хы Хы Хх у “Ұ.Ә Кесе» 


0000000000000000000000000000 . X J „ЧӨ 090( a qi x = > )000000000000000000000000000( 
OOOOOOOOOOOOOOOOOOOOOOOOO ーー © @ ы 27774 


177575757277 0575050575750076 A ATA OO Еа ЕГА, уо 
ГҮҮҮҮҮҮҮҮҮҮТҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮТҮҮТҮҮҮТҮҮҮҮҮҮҮҮҮТҮҮҮТҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮҮТҮҮҮҮҮҮҮҮҮЇ 


電子 キー ボー ド 
カシ オト ー ン MT-52・CT-430・CT-102 


呈 カ シオ 計算 機 (株 ) よ り , 1.944 通 り の リ 
ズム ・ 伴 奏 バ リエ ーション が 楽し め る “MT- 
52", リア ル な PCM リ ズム 音源 を 採用 し た 
“CT-430"。 コス ト ・ パ フォ ー マ ン ス に 優 
れ た "CT-102" の 電子 キー ボー ド 3 機種 
が 発売 され まし た . 

nido 

MT-52 9 好み の リズ ム , 伴奏 パタ ー ン を 選 
べ さる スー パー ドラ ム ス 機 能 罰 多彩 で 美しい 
12 音 色 際 フィ ルイ ン が つい だ 8 種類 の 本 格 


派 オ ー ト リズ ムシ 表現 力 を 高め る サス ティ 


ン / リ バー ププ 効果 ゆ e コー ド 演 奏 も 楽し め る 

8 音 ポ ボリ フォ ニッ ク 

CT-430p リア ル な PCM リズ ム 人 音源 採用 の 

本 格 派 オー ト ・ リ ズム 多彩 で 美しい 20 音 色 
Ho Edit СУ 


ム と 192 通 り の 伴奏 リエ ーション 立体 


な の る っ /) 


感 あ ふれ る ステ レオ ・ サ ウン ド が 楽し め る 
2 スピー カー 内 上 蔵 了 表現 力 を 高め る ビブ プラ 
„лү ө T. Р ЖЕ АӨИ,» 
リバ パ バー プ 効果 

CT-102 美しい 6 種類 の 音色 区 演奏 を 盛 
りり 上げ る オー ト ・ リ ズム 機能 指 一 本 で 伴 
тест та НЕ 


eme, 


АКА АА АА ААА АА АА АА АТАТАТАТАТ АТ) 
A 00000000000 


も 楽し め る 8 音 ポ ボリ フォ ニッ ク 

ж) 

MT-52 Ұ29,800 

CT-430 359,800 

СТ-102 ҰЗ4,800 

《 問 い 合わ せ 先 》 

広報 室 

160 東京 都 新 宿 区 西新 宿 2-6-1 
新宿 住友 ビル 

7» (03) 347-4830 


カシ オ 計 算 機 (株 ) 


(2, 5 と っ て も Happy で 充実 し て る ツル ン ナ より ) 


139 


ここ は , РІО 読者 に よる パソ 
コ ョ ン ・ ク ラブ や サー クル の 紹 ト 
コー ナー で す . 皆さん も 仲間 を 
集め て パソ コン ・ ラ イフ を 充実 
させ て ぐだ さい P 


⑯NEC の PC シリ ー ズ (20, 82, 98, 100% 
リー ズ を 除く 〈). 

@ 約 20 名 , 14.5-F 

⑯ 主 に ソフ ト , ハー ド の 情報 交換 . その 他 . 
@PC ユ ュー ザ ー で , PiO が 好き な 人 な ら ど 
な だ て で も, 男女 問い ませ ん PCRC 本 部 
「 入 会 希望 」 係 に 60 円 切手 同封 の 上 (必ず ) 
連絡 し て くだ る い . 

と に か く 頑 張っ て 行こ うと 思い ます . な 
ы, こち ら の 都合 に より 次 の PiO 発 売 日 ( 来 
月 の 8 日 ) が 会 員 募 集 の 〆 切 と る きせ て い だ だ 
si. 会 誌上 で BASIC 講 座 も 連載 中 で す . 
中 沢 秀樹 ( 高 1) 

4245 神奈 川 県 横浜 市 戸塚 区 和泉 町 696 
PCRC 本 部 


PC-8001, PC-8801/mk II / 


ФРС-6001, 
SR. 
Өле, 16+ 


ン レン フト お よび 情報 の 交換 . 
⑳⑳ ニ ユー ザー の み , 60 円 切手 同封 また は 
ҰС mki Lab」 ま で . 

な し 

千村 一 展 (16 才 ) 

4229 神奈 川 県 相模 原市 下 九 沢 1828-2 


⑩FM-7 シ リー ズ . 
Ө10%, 17+ 

@⑯》 他 の パソ コン ・ 
b ながら, 
ザー 同上 の 情報 交換 の 場 に し て いき だ た いと 
思い ます . その 他 ソ フト 交換 な ども 計画 中 . 
ONT O.K. 女性 , イラ スト の 描け る 人 


クラ プ と コン タダ クト を 取 
会 誌 (月 1 回 発行 ) を 通じ て ユー 


‘NOD 
Pe 


== 
+ 
© 


大 歓迎 . 詳し く は 60 円 切手 同封 の うえ ぇ 封書 
T 
@> Z b y 5 z SA, ПЕСІҒЗА, F 


か っ た ら お 手紙 くだ さい . 
@ 金 子宮 人 ( 高 1) 
兵庫 県 姫路 市 広畑 区 吾妻 町 1-13 


9671-11 


⑯FM-7/NEW7/77 の ユー ザー を 中 心 と し 
qi eee 

@21 名 

@⑯soft の 情報 交換 を 中 心 に . 

入会 希望 の 方 は 返信 用 封筒 に 60 円 切手 を 
貼っ て 下記 まで 送っ て くだ さい . 入会 案内 
書 を 送り ます . uis 入会 金 , 会 費 は 不要 


Y. 
な し 
Omni Z | 
679-21 兵庫 県 神崎 郡 香寺 町 溝口 1069 


OSHARP X1 & MSX 

@ 会 員 は 結成 し た ば か りな の で , まだ いま 
АҒА, な る で 12-14 才 で らい に し だ いと 
思っ て いま す . 

@⑯ プ ログ ラム を 募集 し , 会 誌 (タイ トル 未 
定 ) に 載せ ます . 会 誌 は 毎月 15 日 に 発行 し 
š+. な お , ソフ ト の 交換 や 共同 開発 し た 
ソン フト を , PiO な ど に 発表 な ども 考え て い 
id. 他 に や り だ いこ と が あっ だ ら , どん 
どん や っ ちゃ いま す . と に か てく 充実 し た 内 
容 に し だ いと 思い ます 。 

@⑩12 一 14 才 で らい の 人 が いい で すす (別に そ 
れ よ り 上 で も 下 で も いい で す )。 他 に は 別 
に あり ませ ん .「 入 会 希望 」 と ハガキ に 書 
vc, 石川 の と ころ まで お 願い し ます 。 
な し 

石川 純也 (中 2) 

47979-54 福島 県 東白川 郡 境 町 大 字 上 渋井 
FAIK Т 63 


,9MZ-1200: 80K/C/K2/E/700/1500, etc. 
Ө45%, 20+ 

会 誌 発行 2 筒 月 に 2 冊 ( 近 いう ち に 1 筒 月 に 
1 冊 発 行 予定 ). 名 息 発行 (半年 に 1 冊 ). 
MZ 周辺 機器 等 の 売買 . 新 ソ フト 制作 . ^ 
ー ド 新作 発表 。 賞金 付き プロ グラ ムコ ユ コンテ 


xF. 2 一 3 筒 月 に 1 度 集会 . | 
Өл 2 #50014 & S 2640011 (1102) 57) 2 0) 
Р, 現金 。 小 為 替 の いずれ か で 下記 住所 に 
送っ て くだ さる い 。 入会 資格 は 老若 男女 誰 で 
も 結構 , 気軽 に 連絡 くだ るい . 入会 し だい 
が 会 費 が 高い と いう 人 人 も: まず 連絡 くだ る 
i. 

⑲ 絶 対 に この 会 に 入ろう . 女の子 も 入会 し 
て いる We Love MZ へ . 最近 衰え て きた 


MZ を 救う た め , 分 We Love MZ は 旅立つ . 


Qf HHE (18-Ғ) 
&»658 神戸 市 東灘 区 本 山南 町 1-4-50 
ІК FAL 3€ 312 97-55 


PS.2 


ФРАЅОРІАТ, PC-8801/mkII /SR. 
Өсе, 14% 

ン フ ト の 情報 交換 な ど が 主 . 

@ 対 象 機種 を 持っ て いる 人 な ら だ れ で も. 
60 円 切手 同封 で 「 入 会 希望 」 と 書い て くれ 
れ ば 案内 書 を 送り ます . 

© な し 

Ө e BEER (H3) 

49444 愛知 県 岡崎 市 大 和 町 家 下 19-5 


マイ コン と 名 の 付く も の (も ちろ ん ポケ 
コン も ググ ) を お ぉ お 持ち の 方 な ら 入 会 で きま す 。. 
@ 約 50 名 , $J15-F 

@ 月 1 回 会 報 の 発行 た し ソ フト 交 換 . 

@60 円 切手 同封 の 上 , 下記 住所 まで . 案内 
書 を 送り ます . 


な し 
斉藤 労 ( 高 3) 


49346 埼玉 県 久喜 市 久喜 402-2 


u 


ФСЕСА SC シリ ー ズ orSG シ リー ズ お よび 


オセ ロ ・ マ ル チ ビ ジョ ン 。 

@17 名 , 15.2 
毎月 1 回 会 報 を 出し て ます . その 中 で カ ヵ カ 
+ > F %#&, Game 必 勝 法 。 各 Game の ハ 
4* 427, BASIC 講座 最新 Game 情 報 , 
人 気 Game BEST5, みん な の 要望 を ま と 
D TEGA きん へ 送る コーナー, etc tm 
っ て いき ます 

@SC シ リー ズ ま た は SG シリ ー ズ を 持っ て 
いる 人 は , 「 入 会 希望 」 と 書い て 年 会 費 2. 
400 円 (200 円 X12 筒 月 ) を 送っ て くれ れ ば 
OK で す . | 
編集 部 員 を 抜か し て , 


100%5С or SG ユ 


ーー ザー です. その だ め 会 報 の 中 身 も 濃い で 
+. また PiO で 有名 な 人 も 2 名 程 お り ま す . 
Т каи 277 

稲沢 鐘 吾 (16 才 ) 

80227 神奈 川 県 横浜 市 緑 区 市 ヶ 尾 町 1159- 
20 


編集 部 ガサ ら の お 知ら せ 
この コー ナー に 掲載 を 希望 され る 場合 
8, @-~-@ ま で の 項目 に つい て 詳し く 明 
記し , 封書 で お 送り くだ さい . [Р] 


b'zi£$vIMURUR/bbo»rt—c2SoiToWWit ROT, 学校 の みな る ん に 見 せ び がら か し た 結果 、「 オ レ の 名 前 も 載せ て 
欲し か っ た だ な ….」 と ゆっ わけ で (ビー ゆー わけ だ 9) 古 橋 き ん , Жал, HAN ШЕН. 古市 者 。 名 前 載せ まし た よー ん . 見 て る か ~ー 
en PS こん な コピ ビ コ ビ うっ て い ー の だ ろ ぉ か 。 ひん し ゅ く か う よ う な 気 が …、」 
っ PS3 私 は 受験 生 で す 。 itt (UE. 


「 で わっ し ゃ 」 さん, 私 は ボツ 回 数 27 回 で す よ 
(MCNT の 和 亜 魔 留 ) 


自分 が 欲し いと 思っ て いた 機能 を ほとん | | コマ ント 早見 表 @ 
ど 持っ て いる (人 は これ を 自己 満足 と 言う ) "eri T 
パタ ー ン ・ エ ディ タ を 作っ た の で 発表 ( エ " np ; 入力 する デー タ 
ラン ウ に ) し ます . 
最初 に 断っ て お きま す が , この バタ ー 2 
ン ・ エ ディ タ ( 以 下 TANPOPO と 書き ます ) 


は 僕 の 好み で 作っ た も の な の で , 機能 , Ж | 1)РАСЕ 1 and 2 | | 
作 キ ー な と 気に入ら な いと ころ が 多い か と 2)PAGE 1 セー プ し た い ペ ー ジ の 番号 ([1|-]3|) 
思い ます が 我慢 し て くだ さい .- PAGE 2 


INPUT FILE NAME 8 文字 以内 の ファ イル ネー ム 


カク ニン スル テー プラ セッ トシ テク ダサ イ 
PRESS SPACE BAR 


※FILE モ ー ド ・ メ ニュ ー か ら [ RETURN | を 押す と メイ ン ・ メ ニュ ー に な る . 


1 K で 書い て ある だ た め BASIC ょ り は や や - ーーーーー 


| 速い (メモ リ 操 作 は 激 速 ). SEITE Y | اا‎ 
| leni sie Cas 
3 うっ つかり ミス を 防い で いる 。 これ に つい 

ыса аА кю 
4 簡易 で は ある が アニ メ 機 能 が あっ て ォ モ | É 


ЖЕНЕ, 呼び 出し キー Жала? же A713: 2 


を えた いる の カラ ー コ ー 


1)32 メ 16 ド ッ ト 固 定 で ある (だ っ て ゲー ム - - 
среде ән йк е IN 
voz), pud ハン テン ホウ コウ 

2) プ ログ ラム が 巨大 (だ っ て 技術 が な いん < 

だ も ん , 仕方 な いよ ね ). 

も もう も つ 、 こ の ニギ ディタ に は スシ ・ ア ッ タッ 
2, ペン ・ ダ ウン の 概念 が あり ませ ん . С 
れ は 僕 が どう し て この 機能 が 他 の エディ タ 
に ある の ヵ 理 解 で き な い だ ため 付け な か っ た 
DCT. 付け だ い 方 は ゲロ グラ ム を 改造 し 
CONS Vv. 


ケシ テイ イデ スカ ? 
ヨ ョ ケレ バ “Y” ラオス 


4 1 1 i Хак өк кн 2-5. 2 D жЕ А 


① ま ず リ スト 1 を 入力 し て モー ググ し て くだ 


=. АИ E E dd PP サギ ui EDIT モ ー ド ・ メ ニュ ー か ら [ RETURN | を 
iJ, リス ト 2 を 入力 し ます . Shuk 

ュ ン パイ ラ の ソー ス な の で 行 の 先頭 の 入力 が 終わ っ た ら コ ン パ イル で す . コン タッ ク ・ エ リア 

"+" # mt. с. 僕 は いつ も KEYS, 28 À м IX 1/O'84 年 12 月 号 の RANDOM сооз 実行 時 の 変数 , 

CHR$ (13) + ^'7 bL BOX の 『 便 利 な エク ゼ キ ュー タ 』 に 以下 の $50CEO$4C—$CCJ) AX v 7-7 

AUTO モ ー ド で [RETURN | の か わり に 変更 を し て か ら や っ て くだ さい . コン パイ ル 終 了 後 $5000 に $34, $5001 に 

[PF5 | を 押し て いま す . 0 $5005 の $4C 一 $EO 一 コン パイ ル 時 の ス $7F を 書き 込ん で SAVEM "EDITSUB^, & 


婦 プ ログ ラム と イラ スト た くさ ん あり が と う . 着実 に 上 手 に な っ て ます ね . 今度 右向き の 女の子 に 挑戦 し て くだ さい . 
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gie 


メモ リ ・ マ ッ プ (動作 時 ) 


"EDIT SUB" 
(マシ ン 語 ) 


"EDIT SUB" 変数 
スタ ッ ク ・ エ リア 


"MAIN" 変数 , 
ええ タック より プア 


BLUE DATA 
64 バ イト 


RED DATA 
"64 バ イト 


GREEN DATA 
64 バ イト 


H5000, &H76C9, O[RETURN| と モー ブ 
LT UMS СУ, 
③ リ スト 3 を 入力 し て SAVEM “RELOCATE”, 
&HFC OO , &HFC1 5, &HFCOO [RETURN] 
と 。② の 次 に モー グ し ます . 
④⑨④⑦ リ スト 4 の K コ ン パ イラ の ソー ス を 入力 
№, ② で 変更 し た 後に 更に 下記 の 変更 を し 
だ KK コシ ッ パ ポイ プラ で コジ マイ ル し ます 。 
$50C00$CC—$DC 
$50CEO$CC—$DC 
コン フイ ル 終 了 後 $5000 に $34, $5001 に 
$7F を 書き 込み SAVEW "MAIN", & 
H4DOO, &H7A64, &H5000 
と セー ブ し て くだ さい . 
⑤ 最 後に リス ト 5 を 入力 し て モー ブ す れ ば 
сеа あがり で ぞ です. 


RUN "LOADER" | RETURN | と する と 
し ば らく し て タイ トル 画面 が 出 て 何 を や る 
か 聞い て きま す . 以下 で は 各 モ ー ド に つい 


| コレ ラ ケ シ テイ イデ スカ (Y) ? 消し た けれ ば [Y] を お ぉ す 


コピ ー し た い パ ター ン の ペー ジ 


| ド ノ パ ター ン ラ ? | 
| PAGE: [1] また は [2| 


1) ペ ー ジ の コウ カン 
2) パ ター ン の コウ カン 
ド チ ラ デ ス カ ? 


ペー ジノ コウ カン シマ ス 
ヨロ シイ デス カ 


て 説明 し ます 
1. FILE モ ー ド 

カセ ッ ト と デー タ の や り 取 り を し ます . 

最初 に "1 )LOAD or 2)SAVE or 3) 
VERIFY" と 開い て くる の で それ ぞ れ の 番 
号 を 選ん で くだ さい. | 

2) を 選ぶ と 次 に “1)PAGE 1and2 
2 )PAGE 1 3)PAGE2" と 聞い て £56 
の で モー ブ し た い ペ ー ジ に 対応 する 番号 を 
AJ LTD SOC, | 

ロー ド , セー ブ 時 に は ファ イル 名 を 要求 
し て きま すか ら 8 文 字 以 内 で 入力 し て くだ 
Sv. 

すべ て の 場合 最後 に “PRESS SPACE 
BAR" と 入力 要求 し て き て , [SPACE |+ 
ー を 押す と , それ ぞ れ ロー ド 。、 セー プ 。 ペペ 
リフ ァ イ を 始め ます . 


どん な 状態 か ら で も | RETURN | キー を 


パタ ー ン の 切り か え が 速 く な る 


押す と FILE モ ー ド の メニ ュー に 戻り 。 も 


5 1 度 | RETURN | を 押す と メイ ン ・ メ ニー 


ュー に 戻り ます 。 
2. EDIT モ ー ド 


最初 は ぼ の ペ ー ジ の パタ ー ン を エディ ッ 


ト す る か 聞い て きま すか ら 。, 
て くだ きる い . する と 次 に タテ, 


1 か 2 で 答え 
нә E 


の パパ ター ン を エディ ッ ト す る か 聞い て きま 


すか ら , それ ぞ れ 入力 し て ください. 


ここ で も [RETURN | を 押す と , タテ , 


ョ ヨコ を 入力 する と き に は ペー ジ 入 力 に 戻り 


その 状態 で ま た | RETURN | を 押す と メイ ` 


ン ・ メ ニュ ー に 戻り ます 。 


いや ぁ ー “カカ "の 出る 時 期 に な り ま し た ね ェ …。 パソ コン の 上 に だ か っ て いる "ж" は だ だ く の が 恐怖 で す .。 手 の 上 に だ た か っ た だ “97 は 思 
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[ ) E 
いっ きり だ だ け ま す が 。 
e 2 ー イ 丸 見 て る か ? オ レ だ よ 。 オレ ヒノ 


この 前 は ウデ に くっ きり 手 の 跡 が 付い て し まっ ただ. 


と ころ で ,。 東京 の 方 に は いま だ に “ カ " が いま すか ? 
(パン コン に 全然 関係 の 無い 話 を し な が ら 常 連 に な ろう と いう ズー ズー し い MEOU) 


SP. X 


pIO 


し だ 色 に カー ン ル の 色 が 変わ り ま す . 
[x] : КР КӨМЕС 
[Z]: ドッ ト の サリ セッ ト 。 
AOA: カー シル の 移動 

: カーソル を 左上 端 に 戻す . 
[cts |: パタ ー ン の 消去 . この キー を 押す 
t. ИСТС EMET. OTS ҰН; 
で いい な 6|Y| キ ー, いや だ っ た ら 他 の キ 
“ЛЕТ «ІР, 
[c]: 色 の と りか ぇ . “モト ノイ ロ , カエ ル 
イロ "と 順に 聞い て くる の で , それ ぞ れ 変 
えた だ た い 色 , どん な 色 に 変え る か を |1|-|Z| 
の カラ ー コ ー ド で 入力 し て くだ さい . する 
L, これ で いい か と 言っ て くる の で よけれ 
ば |[Y| キ ー を 押し , 変 た た く な けれ ば [YI t 
| RETURN | 以外 の キー を 押し て くだ さい . 
また 色 を 聞い て きま す (| RETURN | を 押す 
と コマ ンド モー ド に な る ). 


[T]: 反転 機能 . "H or V” と 聞い て きま す . 


НС ЕТ, V で 左右 が 反転 し ます . 
[О]: 重ね 合わ せ 機能 . まず 重ね 合わ せな た 
いっ フタ ー ン を 選び ます . これ は 最初 に パタ 
ー ン を 選ぶ の と 同じ 要領 で . ペー ジ 入 力 時 
(= [RETURN | を 押す と コマ ンド の キャ ン 
ENCE TERI дул S L YG 
[RETURN | を 押す と , また ペー ジ 入 力 か ら 
や り 直 せま す . >* マ ター ン を 選ぶ と 次 は , 
AND, OR, NOT, XOR の と の 方 法 で 重 
ね る か 聞い て きま す . それ ぞ れ に 対応 する 
数 を 入力 する と 重ね て いい か と 聞い て くる 
の で よけれ ば [|Y| 7557: 6180 —* $9 
し そそ で だ きい (RETURN eT Es 
は キャ ン セ モル さる れ ま す ). 
[ESC] : パタ ー ン の 格納 . 今 まで エディ ッ 
ト じ た パタ ー ン を メモ リ に し まい ます 。 最 
初 に パタ ー ン を 選ん だ と き と 同 様 に どこ に 
格納 する か を 決め る と , これ で いい か lB 
いて くる の で よけれ ば [|Y| キ ー を 押し て く 
だ さい . や は り |RETURN | を 押す と コマ 
ンド は キャ ン セ モル さる され ます . 

この モー ド で 注意 し な く て は な ら な い の 
は 格納 モー ド で パタ ー ン を 格納 し な けれ ば , 
メモ リ に パタ ー ン を 書き 込ま な いと いう こ 
СТ. つま り 。 コマ ンド 入力 の 状態 か ら 
[RETURN | キー を 押し て メイ ン ・ メ ニュ ー 
に 戻る と その パタ ー ン は メモ リ に は 登録 き 
れ な いと いう こと で す . 気 を 付け て くだ さき 


bv. 
3. PATTERN 管 理 モ ー ド 


スト 1 "LOADER" 
1 の MIDTHBO。 25: CLEAR 106,&HDFF 


読ん で 字 の ご と く バ パターン の 管理 を する 
モー ド で す . 機能 ほし て は パタ ー ン の 消去 , 
ュ コピー, 変換 な ど が あり ます . 

この モー ド で は メモ リ 内 の すべ で て の パタ 
ー ン が 画面 に 表示 る れ , 左 が ペー ジ 1, Ж 
が ペー ジ 2 と な っ て いま す 。 


1 ) KILL 

ター ン の 消去 を し ます . この 機能 を 選 
ぶ と 例 の 要領 で ペー ジ , X7, ヨコ と 聞い 
て くる の で メッ セー ジ に し だ が っ て 入力 す 
5L, 画面 上 の パパ ターン を 黄色 い ワ イマ ヤー 
フレ ー ム で 囲っ て , 消し て いい か と 聞い て 


くる の で , 消し て よけれ ば [|Y| を 押し ます . 


ӨСӨРҮ 
>* タ ダー ン を 他 の 場所 に コピ ー し ます . x 
の > パター ン の 位置 , コピ ビー し た だい 位置 を メ 
ッ セ キー ジ に 従っ て 入力 する と > パ ター ン を コ 
ピー し ます 。 

3)EXCHANGE 

パタ ー ン の 交換 を し ます . 最初 に , ペー 
ジ の 変換 か , パタ ー ン の 交換 か 聞い て くる 
OT, 1 ページ まる ご と と りか えた だ た けれ ば 
1. パ ター ン ご と に と りか え だ け れ ば 2 を 選 
ん で くだ る い 、. | 

1 を 選ぶ と 交換 し て いい か と 聞い て くる 
の で [Y| を 押し て や る と ペー ジ 1 と ペー ジ 
2 を 入れ か えま す . 2 を 選ぶ と と COPY の と 
き と 同 じ よ うに 。 20203: 1 720-209 
ー ン を 入力 要求 し て くる の で , 指示 に 従っ 
て 入力 すれ ば , 2 つの パタ ー ン を 交換 し 
£31. 

この モー ド で も | RETURN | キー を 押す 
と 1 つか 2 つ 前 の 状態 に 戻っ て , パタ ー< 
管理 の メニ ュー の 状態 で | RETURN | キー 
を 押す と メイ ン ニュ ー に 戻り ます . 
4 . ANIMATION 

簡易 アニ メー ショ ン 機 能 で す . 8 枚 ま で 
の ター ン を 順に 入力 し て , 8 枚 パ ター 
に する か , これ で 終わ りか の 問い に 対し 
v. PECORE と 画面 中 央 が マル チ ウ 
ンド ツウ 風 に 開き , 入力 し だ ターン を 順 

Halic 

入力 し た >* マ ター ン の タテ, ヨコ は 画面 の 
1 番 下 に , ペー ジ 1 の >* マ ター ン は 赤 , ペー 
220025 VBAC 表示 る れ ま す . 
BASIC リ スト 


29 LOADM: LOADM"RELOCATE", ,R:LOADM"MAIN"; 


RUN"FILE" 


パパ ター ン を 切り 換え る 速 さ は カー ソル ・ キ ー 
の [| で 遅く [は | で 速く な り ま す . 

[ESC | キー を 押す と 再び パタ ー ン の 入力 
に な り ま す . 

| RETURN | キー の 機能 は こ 

す . 1 


a wo s 


Sox 忘れ まし だ か 5 K の ラン タイ ム の WE 
89 は 初期 状態 で 必ず $01 で ある こと を 確認 し 
人 

僕 も し ん どく な っ て し まっ て , 最後 の 方 
の 説明 が 雑 に な っ て し まい まし だ た が, も と 
も と この TANPOPO は マニ ュ ア ル の いら な 
い 会 話 型 エディ タ を めざし だ た も の な の で 使 
っ て いる うち に すぐ で 使 いこ な せる よう に な 
る と 思い ます . 

最後 に .。 この TANPOPO が Super Me- 
phist 大 先生 , 谷山 浩子 る さん, また だ 全国 の 
FM ユー ザー の 方 々 に 使っ て いた だ だ けた だ ら 
作者 と し て こん な に うれ し いこ と は あう ふま 
TA. 

b, そ 一 だ . 参考 文献 を 書く の 忘れ ちゃ 
^. 
eL LP 4 
1) Mt : RANDOM BOX "K コ ン パ イ 
ラ 用 便利 な エグ ゼ キ ュー タ ", 1/0, '844F 
12H € | 
УЫ Ке サン 
ク ・ サ プルー チン "。1I/O, "83 年 4 月 号 


PAGE»1 


Bree eene 
нинен 
PHA HERE RH HH 
AAAAA 4 


панинин 


s 


РРА: 


19 "CLSL1 

20 "EDITSTART; (*EDITER / 4U7"**) 

JO” Х1=1; X2=272; Y1=1;Y2=152; COL=7 
40 * CSCO; 160,2, 1;6, 7; "PAGE NO.?"J 


50” PAGE-GET; IF PAGE« $31 OR PAGE >%32 


THEN 
60 " IF PAGE-$0D THEN 
70 …"* COMCLSE 2 


во, CODE $35, $FF 
90`? F1 

00:7 IF PABE=" ” THEN 
1196 GOTO EDIT1 

120 ° 2 ELSE GOTO EDITSTART 
150 ” PI 

140 ° FI 


FAGENUM-FAGE- $51 
'EDIT1:LOCE 18, 2023 COLORC 713: ?PAGENUM-* 


, PAGEPUTE 1 
, 1 = の 
, WHILE 1<-5 
, NS[336+48*1,0, 2,1,7, 1+$30] 
, I=I+1 
, WEND 
, 1=0 

WHILE 1<=6 

№5224, 16+24%+1,2,1,7,1+%501 

, I=I+1 

WEND 
жы 


"EDITSUB" v —Z + !) x F maaa 


290 ° CSCO, 1 6 日 。 2 』 1 。 ら 。 さ 。" タテ =" ] 
300 ” TLC]; T-GET; TLC]; IF T<$3@ OR T>$ 
56 THEN 

310 IF T=$0D THEN 

529 COMCLSE 1 

330 ' GOTO EDITSTART 

540 FI 

350 ' IF Те” ” THEN 


3660 GOTO PTATE 
a ELSE GOTO TATE 
FI 


EI 

TA=T-$30 
"PTATESLOCE^, 211; СО ОКЕ7 15 TA 
* YOKO; 


143 


OO 


リス トク "EDITSUB" ソー ス ・ リ スト 


430 ° CSCO, 176,2, 1,6,3, "32-"] 
440 ° YLL 1; Y-GET; YLL]; IF Y<$3@ OR Y>$ 
35 THEN 
, IF Y2$0D THEN 
COMCLS[ ] 
GOTO EDITSTART 
FI 
IF Үш” * THEN 
GOTO PYOKO 
ELSE GOTO YOKO 
FI 
FI 
YO-Y-$30 
"PYOKOs LOCE 6, 221: СО ОКС7 2; ?YO 
, LINEL322*48*Y0, 14+24%*ТА, 322*48* 
YO*40,14424*T5*19,0,2,11 
d PUT[272。 152, PAGENUM*42^TA*6*YO, 


“ ` ` ` ` ` “ ч 


y [= の 

á WHILE I<=31 

ы 4-0 

T WHILE J<=15 

? IF POINTELI*272,J*152,01 
THEN LOC[ I+4,J+21 

€ COLORC 71. 

> Е 2... 

d FI 
5 С=1 
E WHILE C<=7 

4 IF POINTLI*272,J*15 
2,C12-1 THEN LOC[I+4,J+21 


CURSOR2C 1 
CS8L32,152,2,1,7,6, "COLORzx" ] 
LOCE 16,193: COLORLCOL 1:2" wawawa 


` ч “ ` ` ` ч ` м ` ` 


, С5г09,144,2,1,6,19,"<<<ЕрІТ>>>"1 
"COMHAND;: (*27»h^ / Ny?” уж) 
830 °? COMCLSE 1; COLORC 53 
d LOCL6, 201; ?"Z":5 COLORE71: ?") PSET 
,"$SCOLORES1; ?"X"; COLORC713 ?") PRESET" 
850 , COLORLS1:LOCCLÓ, 2113 ?"C"$ COLORE7 
137") ANGE COLOR, "; COLORL S1: ?" T"$ COLORC71 
š 7") URN, "s COLORC S3; ?"0" 5 COLORC71: ?") VERL 
AY" 
850 * LOCC, 221: COLORE S1: ?" CHOME], CCL 
S1, СЕ5С1"; COLORE 71: ?") АРЕ" 
876 'COMHAND2; ; 
BB の * КЕҮ-бЕТ 
890 ° IF KEY-$0D 
900 ° IF KEY=*Z* 
HAND2;F I 
910 * IF 
OMHAND2; ЕІ 
920 * IF 
OLORC3;FI 
930 °? IF 
;FI 
940 * 
FI 
950 ” IF 
JsFI 
950 ? IF 
YE]iFI 
970 °? IF 
DITEND;FI 
980 * IF KEY-'H* THEN GOTO COMHAND;FI 
990 "^ | IF KEY> ま 1B AND КЕҮ<%20 THEN CUR 
SORL1:GOTO СОМНАМр2; FI 
1000 , IF KEY>'@' AND KEY«'8" 
L-KEY-$30 
1010 ° LOCL 16,191; COLORECOL 1: 7" Ва 
ШЫҒЫНЫН": CURSORC 1; GOTO COMHAND2;F1I 
1020 * GOTO COMHAND 
1030 °РЅЕТ; (* テン 9 99 ж) 
1040 ° LOCEX1*2,Y1*11: COLORCCOL]; ?" e" 
1050 ° DOTCX2, Y2, COL ] 
1050 °? X1=X1+1 
1070 ' IF X1= さ さ THEN IF Y1=16 THEN X1 
'=1; Y1=1; X フ ェ フ フフ ョ Y22152 
1080 ° ELSE X121: Y1-Y1*1: X2=272;Y 
2=Ү2+1 
1090 ° FI 
1100 7 ELSE X2=X2+1 
1110 * 
1129 ° 
1130 ” 
1140 "PRESET』 (ж テン Э ケス ж) 


THEN 
THEN 


CODE $35, $FF;FI 
PSET[ 1: GOTO СОМ 
KEY=” X” 


THEN PRESET[ 2; GOTO C 


КЕҮ-”С” THEN COMCLSC 1: CANGEC 


KEY-*T* THEN COMCLSE 1: TURNE 1 


KEY-$0B THEN COMCLSC 1: HOME [ 1 


KEY=$@C THEN COMCLSEI 1: CLEARE 


KEY-*O' THEN СОМСІ 5Г 1: OVERLA 


KEY-$1B THEN COMCLSC 1: GOTO E 


THEN CO 


1156 LOCEX1*3,Y1*11: СО ОКГС7 2; ?"+" 
1160 DOTL X2, Y2, 01 
1170 ХітХізі 
1180 IF X1-33 THEN IF Y1=16 THEN X1 
-15Y1-713 X フ = フフ 723 Ү2-152 
1190 ” ELSE X1-713Y1-2Y1*1: Х2=272;Ү 
2-2Y2*1 
1200 ” FI 
1216 ELSE Х2=Х2+1 
1220 ҒІ 
1236 CURSOR?2E 1 
RETURN 


1256 'CANGECOLOR: (ж イロ ノ トリ カエ ж) 
1260 'S81:CSL0,160,2,1,6,6,"th/40-"J 
1270 " MC-GET 
1280 ° IF МС<%50 OR MC»$37 THEN 
, IF MC-$6D THEN 

, COMCLSE 1 

, RETURN 

, ELSE GOTO S1 

, FI 

> FI 

, MC-MC-$306 

, CS[96。 169。 2。 1 。 MC。 1, "Ш" J 

* G2』 CS[ 1 2 日 。 160,2, 1,5,6, "カエ ルイ ロニ " ] 

, CC-GET 

, IF CC<$30 OR СС>657 THEN 

, IF CC-$0D THEN 

š COMCLSL1 

, RETURN 

, ELSE GOTO S2 

, FI 

, FI 

, CC=CC-$ る の 

, CSt224,1650,2,1,CC, 1, "Ш" 1 

, CSL15,1658,2,1,5,3, "OK?"1 

, CSCO, 176,2,1,6,13, "37L)Y ^ Y" 3 


Q-GET 
IF 0<>%59 AND 0<>%79 AND 0<>%р 


IF 0=%00 THEN 
COMCLSE 1 
RETURN 
ELSE 
COMCLSI 3 
GOTO S1 
FI 
ЕТ 
1=1 
WHILE 1<=16 
Ј=1 
WHILE J<=32 
О=РОІМТЕЈ+271,1+151, МС 


IF Q--1 THEN 
DOTLtJ«*271,1*151,CC 


LODCEJ+ さ 。 1+113 

IF CC=② THEN 
COLORC7 1 
?"+" 

ELSE ` 
COLORCCC 1 


CURSOR2E 1; COMCL SC 
RETURN 

TURN; (ж (59-25 / ハン テン ж) 
$S3:3C8EL6,160,2,1,5,14, "リン テン ホウ コウ 


> 
, 
, 
> 
» 
> 
> 
> 
> 
> 
s. 
Ы 
, 
ы 
E 
> 
› 


(HorV)"] 
1840 ” 
1850 " 
1860 " 
1870 " 
8 THEN 
1880 " 
1890 ” FI 
19009. * IF Q-2$56 OR 0-%76 OR Q-$CB 
THEN 
1910 
1920 
1950 
1940 


QzGET 
IF Q-$0D. THEN COMCLSE 1 
RETURN 
ELSE IF 0-%48 OR Q-$68 OR Q-$B 


GOTO HOLIZONTAL 


GOTO VERTICAL 
ы FI 
: GOTO S3 
Ў FI 
"HOLIZONTAL: (ж スイ ヘイ ホウ コウ 2 ハン テン ж) 
3 Ізі 
: WHILE І<-8 
А Jz1 
WHILE J«232 
Охо 
WHILE POINT[J+271,I+15 


0=0+1 
WEND 
02-0 
WHILE POINTLJ*271,168- 


02=02+1 
MEND 
LOCELJ*3,1*123: IF Q2=0 Т 
HEN COLORC71:?"«" 
2090 * 
2100 ” FI 
2110 "' LOCLJ*3,18-I1: IF Q-6 T 
HEN COLORE71;?"-«" 
2120 ” 
eq Жы FI 
2140 ” DOTLJ*271,1*151,021: DO 
TCJ*271,17—1*151,01 
2150 ° J=J+1 
2160 ° WEND 
2170 * I=I+1 
2180 ” WEND 
2190 ° COMCLSE 3 


ELSE COLORLQ21:?"€&9 


ELSE COLORIGQ1;:?"&e" 


" RETURN 
"VERTICAL; (ж スイ チョ ク ホウ コウ ノ ハフ テン ж) 
Ізі 
WHILE 1<=16 
Ј=1 
WHILE Ј<=16 
0-o 
WHILE POINTLI*271,J*15 


.0=0+1 
WEND 
02-Ф 
WHILE POINTL304-I,J*15 


02-0241 
WEND 
LOCLI*3,J*11:IF 02-0 T 


НЕМ СОЦОКСЕ7 15?" +" 


2550 


2560 
2370 


Y ELSE COLORLO21;?"&e 


е FI 
° LOCL36-I,J*11:1F Q=0 T 


HEN COLOREC71;?"«" 


2386 
2590 
2400 


, ELSE COLORIQJ; ?"e" 
, FI 
, DOT[I+271,J+151,021l;DO 


T[3@4-—I,J+151,01 


2416 
2420 
2450 
2440 
2450 
2460 
2470 
2480 
2490 
250060 
) 

2510 
2520 
2530 


3050 


3660 
. 3 の 7 の 
3080 
5090 
5190 
5110 
5120 
5150 
3140 
5150 


, J=J+1 
> WEND 

, I=I+1 

, WEND 

5 СОМСІ 5Г ] 

, RETURN 

'COMCLS; (ж コマ ント ~ ウイ ント ~ ウ / ショ ウキ ョ ж) 
LINECO, 160, 257; 183, 1,0,22 
RETURN 

? HOME; (ж カー ソル ヲ ж-ж "ay ^ も モト "スズ + 


, C-COL : COL 26$; CURSORE 1: COL =С 

E Xi=is Yi=i 

, X222725; Y2=152 

, CURSOR2L1 

, RETURN 

*CLEAR; (ж カカ "メン / ショ ウキ ョ *) 

P CS[@, 1 6 の 。 2 。1 。 ら 。1 1 。" ケ シテ 445" スカ ?・ 
CLIO, 1 6 日 。 2。 1 。 ら 。 14。" ヨ ケレ ハー "Үү? Э 

Q-GET 

IF 0<>959 AND 0<>%79 AND Q«»$D 


COMCLSE 1 


WHILE 1<=17 
2-4 
WHILE J<= さ 5 
LOC[J,IJsCOLORCL71l;2"+" 
J=J+1 
WEND 
I-I*1 
WEND 
CURSDR2F 1 
LINEL272,152,303,167,0,0,21 
COMCLSt ] 
RETURN 
OVERLAY; (ж N° タージ / カサ ネ ア ワ セ ж 
CSCO, 160,2,1,6,9, "PAGE NO.?"1 
PAGE-GET | 
IF PAGE«$51 OR PAGE>$32 THEN 
IF PAGE=$0D THEN 
COMCLSE 1 
RETURN 
FI 
IF PAGE-* ” THEN 
GOTO PAGESET 
ELSE GOTO OVERLAY 
FI | 
FI 
PAGENUM-PAGE-$31 
PAGESET: LOCI 18, 201: COLORE 71: ?P 


, PAGEPUTE 1 
TATE2』 CSL の 。 1 6 日 。 2 。 1 。6。 さ 。" タテ =" ] 
TLE 1; T-GET; TLC] 
IF T<$30 OR T>$34 THEN 
IF Т=%00 THEN 
COMCLSL1 
GOTO OVERLAY 
ELSE GOTO TATE2 
FI 
FI 
T=T-$30;LOCL 6, 21 1: COLORE 71: ?T 
YOK02:CSt0,176,2,1,6,3, "32-"] 
YLE 3; Y=GET; YLI] 
IF Y<$ さ の OR Y> ま 35 THEN 
IF Y-$0D THEN 
COMCLSE ] 
GOTO OVERLAY 
ELSE GOTO YOKO2 
FI 
FI 
YzY-$30:LOCL ó, 2213 COLORE71; ?Y 
CSL965,168,2,1,7,7, 447^ メカ" ] 
d LINEL322*48*Y, 14*24*T, 352*489*Y 


,53%24%Т,4,6,11 


考え た て 〈 だ きい 。 


БД, ニュー ウェー ブ な ぞ な ぞ を 2, 3 出し ます . 
ー で , 今度 は 水泳 を し まし た だ た . 1 番 ヘ へ タ な の は ダレ で し ょ 5. 
を えて くだ さい 。 …… は い , 時 間 で す 答 え ぇ は, ①X1( シ ャ ー プ な 動き で 1 番 ) ②APPLE( テ アッ プル , 
ン な の で アイ スラ ッ ガ ー で 倒し て 1 番 )、 い か が だ っ た で し ょ 2 う ? 石 を 投げ な いで / 石 を / も し 。 全 問 正解 され た 方 は PiOPiO ま で 1 報 を . 


ФЕМ-7 EX1 と APPLE が 100m 競 争 を し まし た . 1 番 は ダレ で で しょう. 
③ 最 後に 全員 で , バト ルロイ ヤル を し まし た . 1 番 は ダレ . 


② 同 ビ じ メ ン バ 
それ ぞ れ 30 秒 間 


アッ プル と お ちば ぼ ばれ た ). ФЕМ-7(+> 


3160 ° Q-GET 


IF Q«»'Y* AND Q«?^"y* AND < テテ ン 


COMCLSE 1 
LINEL322*48*Y,14*24«*T, 362+ 
48*Y, 322481, 4,6,11 
5200 GOTO OVERLAY 
3210 ° FI 
5220 °ОРТІОМ; COMCLSE 1 
5239, CSt0,1650,2,1,5,10, "17° ya» ジテ イ " 
1 
3240 CSt06,1658,2,1,7,10,"O0R: 1 AND: 2" 
] 
5250 CSt0,176,2,1,7,11,"XOR: 5 МОТ: 4 
"3 
5250 Q-GET 
5270 IF 0<71” OR 0574” THEN 
5280 COMCLSE 1 
5290 IF Q-$0D THEN 
3300 LINEL322*48*Y,14*24*T, 
.362*48*Y, 33«24*T,4,6,11 
GOTO OVERLAY 
FI 
GOTO OPTION 


IF Q-2 THEN CSt6,150,2,1,5,2," 
OR"3;FI 
3380 ' 
AND"23;FI 
3390 ° 
XOR" IJ;FI 
3400 ° 
NOT"1;FI 
5410 '01:CSL0,158,2,1,7,7, 447^ メカ?" 
3420 ° Q2-GET 
3430 ° IF Q2«»'Y' AND 02<>7у” AND Q2« 
>?” THEN 
3440 ° IF Q22$0D THEN 
3450 ° COMCLS[] 7 
34650 ' - LINEC322*48*Y,14*24*T, 
362+48#Y, 33+24*T, 4, 6, 11 
2470 GOTO OVERLAY 
заво ELSE GOTO 01 

FI 


IF Q= さ THEN CSt0,150,2,1,5,3," 
IF Q=4 THEN С5(0,160,2,1,5,5," 


IF Q=5 THEN CSCO, 160,2, 1,5,3," 


FI 
PUTL272,152, PAaGENUM*42*T*6*Y, Q 


к = の 

қ WHILE 1<32 

: = の 

Р WHILE Ј<16 

Р IF POINTLI*272,J*152,0 
THEN LOCLI*4,J*21: COLORE71;?"*"; FI 
- С=1 

; WHILE С<=7 

T IF FPOINTLI*272,J*1 
5?,С1--1 THEN LOCC1+4, J+21; COLOREC1; ?"&e" 
;FI 
3600 
3610 
3620 
5650 
5640 
5650 
3660 


С=С+1 
MEND 
J=J+1 
WEND 
1=1+1 
МЕМО 
CURSOR2E 1 
5679 COMCLSL[ 3 
3680 ° LINEL3224*48*Y,14*24*T, 362-*-48*Y 
,55%24%Т,4,6,11 
5599” RETURN 
5700 'CURSOR; (ж カー ソル / 4h"? ж) 
3710 ° XX=X1;YY=Y1 
3720 IF KEY-$1F THEN 
5730 ` IF Yi-16 THEN Y1=1 
5740 ELSE Y1=Y1+1 
5750 FI 
3760 
5779 


М Да ч. ЖЕ M XP XS 


FI 

IF KEY-$1D THEN 
IF X121 THEN Хі-52 
ELSE X1zX1-1 
FI 


IF X1232 THEN X121 | 
ELSE X1=X1+1 
FI 


Р KEY-$1C THEN 
KEY-$1E THEN 
: IF Y1-1 THEN Y1=16 
Е ELSE Yi1sY1-1 
4 FI 


ҒА 


スト "RELOCATE" 


3920 ' Х2-Х1%271;Ү2-Ү1%151 
3930 ' HLT[ 1; PDKE ADDR,$1C, ((XX*3) #8 
)%, ((YY+1) *B)#, ((ХХ+5) 日 キア ) 8, ( (YY+1) *8+7 
)8,0,5,8,$00,$3C, $7E, $7E, $7E, $7E, $3C, $00 
; SUBE 1 
5940 'CURSOR2: (ж カー ソル / ヒョウ シ " ж) 
3950 ° HLTL1:CPOKE ADDR,$1C, ((X142) #8 
)%, ((Y1+1)#*#8)#, ((X1+3) *B*7) &, ((Y1+1) *B*7 
)*,COL,2,8,$FF,$C3,$81,$81,$81,$81,$C5, $ 
FF: SUBC 3 | 
3960 ' RETURN 
3976 'EDITEND; (ж N° ター シノ カフ ノウ ж) 
3780 ° YY2YO: TT=TA 
5999 *"EDITEND2:; 
4000 ° CSt6,150,2,1,6,9, "PAGE NO.?"] 
4016 Q-GET 
4020 IF Q«$31 OR 0>%52 THEN 
4030 IF Q-$6D THEN 
4040 COMCLSt 3 
4050 GOTO COMHAND 
4650 
4079 
4080 
4090 
4100 
4110 
4120 
+1 
4130 ° PAGEFUTI 1 
4140 
4150 CSt6,168,2,1,65,3,"57-"] 
4160 TL 3; T=GET』 TLC] 

IF T«$30 OR T>$36 THEN 

IF T-$0D THEN 
COMCLS[ 3 
GOTO EDITEND2 


FI 
IF Q=” * THEN GOTO EDIT さ 
ELSE GOTO EDITEND2 
FI 
Ға 
PAGENUM-Q-$: 1 
EDIT3$LOCE 18, 207; COLORCE 73: ?PAGENUM 


"^w € €* E & au^ - $4 bc W 


FI 

* THEN GOTO PTATE2 
ELSE GOTO ТАТЕЗ 
FI 


ТАхТ-%50 
"PTATE2:3LOCE6,2121: COLOR[ 715 ?TA 
* YOKO3: 

? CSCO, 176,2, 1,6,3, "ヨコ ニ =" ] 
*YLE 15 Ү=6ЕТ YLE 2 
IF Y«$36 ОК Y»$35 THEN 
IF Y-2$0D THEN 
COMCLSE 2 
GOTO EDITEND2 


“ 


ЕІ 
IF Үс" ” THENGOTO РҮОКО2 


ELSE GOTO YOKO3 
FI 


ақы МЫ. Л жаз 


FI 
, YO-Y-$30 
"PYOKO2: LOCC, 221: COLOR[ 71; ?YO 
4420 ° LINEL322*48*Y0, 14+24*TA。 さ 62+4 日 
жҮ0,55%24%Т4,4,4,11 
4430 ° С5(128,108,2,1,5,7,"<<0Кк?>>"1 
4440 ” ` Q=GET 
4450 ° IF Q«»'Y* AND Q<>'y' AND 0<>72 
* THEN 
4460 ” COMCLSE ] 
4478 * IF 0=%00 THEN 
4480 ° LINEL322*48*YO, 14%24жТ 
A, 362+48#YD, 33+24*TA, 4, 4, 11 
GOTO COMHAND 
ELSE GOTO EDITEND2 
FI 
FI 
GETE272,152, PAGENUM*42*4TA*6* YO 


PAGEPUT[ 2 
LINE[ さ 22+4 昌 *YY 。 14*24*TT, 542+48 
YY 。 さ さ +24*TT 。 の 。②。 11 
4560 " LINEL222*48*Y0, 14*24*TA, 362+48 
*YO,33*24*T0,0,0,11 
4570 ° COMCLSt( 1 
4580 ° CLEAR2E 1 
4590 ° GOTO EDITSTART 


4600 'PABGEPUTI (# ^*-9— 9 27: 6) 


4610 °? I-6 

4620 ° WHILE I«8 

4630 ° LINEL320,1141*24,607,11*I* 
24,0,7,01 

4640 °? 1=1+1 

4650 ° MEND 

4660 ” I-6 

4670 °? WHILE 1<7 

4686 ° (ІМЕГ520%1%48,11,520%1ж48, 
179,0,7,01 

4690 ° I-I*1 


Add +0 +1 +2 +3 +4 +5 +5 +7 +B +9 +A +B +C +D +E +F 
FCGO B7 FD ОҒ ВЕ 50 00 СЕ 80 00 Аё 80 А7 CO 8С 76 CB 
ҒС10 23 F7 Bé FD OF 39 до 90 00 00 дө 00 の の оде oo oo 


Sum: DA F4 C5 ВВ SF 39 СЕ 86 00 Аё 86 А7 СӨ BC 76 CB 


5250 


$10 


ワリ スト 2 "EDITSUB" == ЖАКА Р 


4700 WEND 
4710 1 =9 

4720 WHILE I«7 

4736 = の 

4740 WHILE J«6 

4750 PUTL328*J*48, 16*1*24, P 
AGENUM*42*I*6*J , 01 

4760 J-J41 

4770 ° MEND 

4780 ° І=1+1 
, MEND 

, CSt208,0,2,1,6,5, "PAGE-"J 

, LOCL36,01:?" " 

, NSC288,0,2,1,4, PAGENUM*1-*$9301 
, RETURN 

, LINEL624,16,624,175,4,6,01 

, RETURN 


LINEL $20,8;608,8,4,6,01 

, RETURN 

'"CLS;HLTEJ:;CPOKE ADDR, $02, 0, 0, 7: SUB 
C 33 RETURN 
4919 'POINT:;HLTLJ:CPOKE ADDR, $1B,%1#,%2# 
, 1#, 42#, 1, 43: SUB[ 1; HLTE 1; DMY=PEEK ($FCBA 
) si POKE $FC80, $80; SUBL1; IF DMY>$7F THEN D 
MY=-1 ELSE DMY-6:FI: DMY=DMY: RETURN 
4929 'LINE;HLTE 1: СРОКЕ ADDR, $15,%6,%5,%1 
8,428, 38,748,773 SUBE 1; RETURN 
4950 'CS; DMY1-X7:HLTEL 1: CPOKE ADDR,$19,75 
,0,0, 43, 44, X18, X28, 46: FOR DMY-6 TO X6-1; 
ADDR: DMY) =DMY 1 : DMY) š NEXT: SUBE Jš RETURN 
4940 "NS:HLTC1;CPOKE ADDR, $19,745, 0,0,43, 
4 418. 428,1, 1653 SUBI J; RETURN 
4956 '"DUI:sHLTLI:;CPOKE ADDRK,$17,1,X19,X24 
, %3, 0: SUBE J; RETURN 


4960 "LOCsHLTEJ:CPOKE ADDR。 さ 。 さ 。 まま 12。 ん 1 。 ん 2 


š SUBE 1: RETURN 
4970 'COLOR:HLTEJ:sCPOKE àDDR,3,2,$11,71: 
SUBE 1s RETURN 
4980 "РОТ; 
4990 ° HLTE 1 
Seoo " ADR=%$FC81;PX=Z1+31;PY=Z2+15 
5010 СРОКЕ ADR,$80,$1E,*X19,7248,PX9*, 
PY#, 0, 74,92 
5020 DATA-$E60*1923*75 
5030 し = の 
5040 WHILE L«96 
5050 ADR:L)-DATA:L) 
5060 し = し +1 
5070 WEND 
5oBe SUBE 1 
5090 HLTEJ 
5100 ADR-$FC81 
5110 СРОКЕ ADR, O, $644, 96 
5120 L=96 
5136 WHILE L«192 
5140 ADR:L-965)-DATA:L) 
5150 し = し +1 
5160 WEND 
5179 SUBE J 
5180 RETURN 
5190 'GET; 
5200 HLTLE ] 
5210 BX= メ 1+ さ 1 3 BY=X2+15 
5220 CPOKE ADDR,$1D,ZX1#,Z2#,GX%, BY 
5250 SUBE 1 
5240 HLTEJ 
DATA-$bE604192*753 
ADR-$FCBA4: PT=PEEK ( $FC83) 
し = の 
WHILE し <PT 
DATA: L) =ADR: L) 
L=L+1 
WEND 
POKE $FCB82, $64 
SUBE J 
HLTE] 
RDR=*FCB4 
DATA-DATA*124:L-0 
WHILE L«68 
DATA:L)-ADR:L) 
し = し +1 
MEND 
POKE $FC80, $80 
5420 SUBE ] 
5430 ° RETURN 
5440 "HLTICUDE $B6, $FDOS#, $2BFB#; POKE $F 
DOS, $80; CODE を $B6, $FDOS#, $2AF BM ADDR=$FC8 
'2; RETURN 
5450 'SUB;POKE $FDOS, ©; RETURN 


4 w о 8:4 ИУ Ya S ДА е 


5260 
5270 
5280 
5290 
5300 
S310 
5326 
5550 
5540 
5550 
5560 
5570 
5380 
5390 
5400 
5410 


Mel ЖОЛЫ е-е Ж.К Ww Wo Ж а WW. EK ғ-еЭтк «Ve cow. 9.93 


マシ ン 語 リス о 2 


л A MAIN” 


1 の ° (*PATTERN EDITOR*) 
29 "(*  TANPOFO ж) 
50 "(ж by F. AOYAMA ж) 


40 "CUDE %В7,ФҒП,ФОҒ; 5Р-%0004 


( ぐ わ っ し ゃ ) 


ンー ス ・ 


” SP (0) 2$2000 
* MENU; 

^ CLSC] 

я С8с192,32, 2,1,5, 14, "PATTERN EDIT 


ОК" 1 
9 の " CSL114,46,7,3,2,7, "ТАМРОРО" 1 


160 ° CSL112,48,7,23,6,7, "ТАМРОРО" 1 
119 ' CSE216,78,2,1,1,14, "by PUMPKIN 


145 


IO 


リス ト 4 “МАМ” ソー ス ・ リ スト 


CS[208,80,2,1,5,14, "by PUMPKIN 


С5г208,96,2,1,6,6,"1 FILE" 
CSL208,104,2,1,6,6,"2 EDIT") 
CSC208,112,2,1,6,12, "3 PATTERN? 


С5г208,120,2,1,6,11,"4 ANIMATIO 


CSt208,135,2,1,7,6, "Which?"J 
Q1-GET 
IF Qi-'1* THEN GOTO CAS;FI 
IF @1=*2* THEN CALL $8666;FI 
IF Qi-2'3* THEN РАТТЕКМС 2; ЕІ 
IF 01=°4° THEN АМІМАТІОМС2:ҒІ 
GOTO MENU 

* PATTERN; 

, CLS[ ]』 ALLPAGEL1 

* PMENU; 
CSCO, 184 。 つ 。1 。 つ 。16。" く くく PATTERN カ ン 


CSE2,184,2,1,6,16, "«««PATTERNTZ 


CSt0,192,2,1,7,24, "1)KILL 2)COP 
Y 3)EXCHANGE" 12 
> INPC$33, $31, 0,480, 1921 
IF RF=1 THEN RETURN;FI 
IF 0=1 THEN KILLCJ:FI 
IF 0=2 THEN COPY[]』FI 
IF Q-3 THEN EXCHANBE[ J:FI 
COMCLSt ] 
GOTO PMENU 
KILL; (* PATTERN / ショ ウキ ョ ж) 
COMCLS[ ] 
CSt6,184,4,2,2,4, "KILL"J 
CSt2,185,4,2,6,4, "KILL"J 
KILL13 , 
CSE144,184,2,1,7,11, "PAGE (1or2) 


` ч “ " ч ч ч ч ч ч “ ч 


INPL$22,$21,0,320,1841 
IF RF=1 THEN RETURNsFI 
PAGE-G-1 
KILL2:1 
CSL144,192,2,1,7,3, "タテ マリコ 
INPL$26,$30,1,192,1921 
IF RF=1 THEN 
COMCLS2t ] 
GOTO KILL1 


6. NEL ME 


FI 
T=0 
KILL3; 
CS[224, 192,2, 1,7,3, "33?" 
INPL$35,$30,2,272,1921 
IF RF=1 THEN 
COMCLS2F ] 
GOTO KILL1 
FI 
Y=Q 
COMCLS2F 1 
, CSL1756,184,2,1,7,18, "コレ ヲ ラ ケシ テ 44 
y"2n()?"2 
5640 ” BOXEPAGE, T, Y, 61 
650 °? Q-GET 
560 ” BOX[PABE T, Y, 63 
670 ° IF Q-'Y^ OR D='y' OR О=° 2° THEN 
GOTO KILL4 
, ELSE СОМСІ 6222 
d GOTO KILL1 
, FI 


ч ч ` ` " “ “ ч ч ч ч ч ` ` ` " 


DATA-$EO0041923* (PABE*42+T*6+Y) 
1= の 
WHILE I«192 
DATA: 1 ) = の 
I=I+1 
WEND 
PUT[32@*PAGE+24+48*Y, 16+T*24, PA 
GE*42+T*6+Y, 01 
790 * RETURN 
800 'COPY: (ж PATTERN / フフ 2 セイ ж) 
810 7 COMCL SE 1 | 
š CSt6,184,4,2,2,4, "COFY"J 
CSL2。 185。 4。2。6。 4。 "COPY" 
СОРҮ1 ; 
CSL144,184,2,1,7,10, "h^ 2Y 9-27? 


С5:520,184,2,1,7,5, "PAGE: "1 
INPL$32,$31,0,400,1841 
IF RF=1 THEN RETURN;FI 
PAGE 1 = ロー1 
PAGE=PAGE 1 
COPY2; 

CSt432,184,2,1,7,3, "97:"] 
INPL$36, $30, 1, 480, 1841 
IF RF=1 THEN 

COMCL S2t 1 

GOTO COPY1 


ч ч “ “ “ “ ч ч “ " " “ ` ` 


CS8L512,184,2,1,7, 3," 22: "] 
INPC$35, $30, 2, 560, 1841 
IF RF=1 THEN 

COMCLS2L 1 

GOTO COPY1 


сесті. 売り 切れ な いし ….。 


BOXLPASE 1 。T1 。Y1 。6] 
ローGET 
IF Q-"'Y^ OR Q-'y* OR 0=° 2° THE 
N GOTO COPY4 
1110 = ELSE COMCLS2L1 
1120 BOXLPABE 1 。 T1, Y1, 61 
1130 БОТО COPY! 
1140 FI 
COPY4; 
CS[144,192,2,1,7,7," h^ 74*$^?"] 
CSL さ 2 の 。 192,2, 1,7, 5, "PAGE: "1 
INPL$32,$31,0,400,1921 
IF RF-1 THEN 
COMCL 5223 
BOXCPAGE1, T1, Y1,61 


Š 
9 


CSL432,192,2,1,7,3, "97:"1 
INPL $36, $30, 1,480, 1921 
IF RF=1 THEN 

СОМСІ 531 3 

БОТО СОРҮ4 


COPY6; 
CSES12, 192,2,1,7,:3, "23: "3 
INP[ $55, $30, 2, 560, 1921 


CSL592, 192,2,1,2, 3, "0K?"1 
BOXEPAGE2, T2, Y2, 41 
O-GET ; 
> IF Q-"Y* OR Q-'y* OR Q-'»* THE 

N GOTO COPY7 
ELSE COHCLS さ FE] 

BOXLPAGE2, T2, Y2, 41 

60TO COPY4 


` ` ч ` ч ч ч ч ч ч ч ч ч ч " ч ч ч ч ` " ч ` ч ` ` ч ч ч y’ ч 


ҒІ 
СОРҮ7: 
DATA1=$E00+192# (PAGE1*42+T1*6+ 


DATAZ2=$E00+192# (PABE2*42+T2*6+ 


I=@ 
WHILE I<192 
DATA2: I) -DATA1: I) 
1=1+1 
WEND 
PUTL320*PAGE2*24-480*Y2, 16*T222 
4,PAGE2*42«*T2*6*Y2, 01 
BOXLPABE 1 。 T1, Y1,61 
BOXEPAGE2, T2, Y2, 41 
RETURN 
"EXCHANGE; (ж PATTERN / コウ カー +) 
, COMCLSI 2 
, С5гӨ,184,2,2,1,8,"ЕХСНАМБЕ"1 
, CS[2,185, 2,2,5,8, "EXCHANGE" 1 
*EXC1; Í 
CSE144,184,2,1,7,14,"1)^* —^ ノー 


CSE144,192,2,1,7,14, "DN ラーン 7 
CSL400,188,2,1,5,9, " h^ »57^ zn?" 


INPL$32,$31,0,560, 1881 
S2L1 

IF RF=1 THEN RETURN;FI 

IF Әс? THEN GOTO ЕХСА; ҒІ 


CSL144,184,2,1,7,25,"^*^-77 Э 3 
ウ カ ン シ マ ズ ヨロ シイ テ ~ лл?" 1 Ë 
1760 = Ө-бЕТ 
1770 Жы IF Ө-”Ү” OR Q-"y* OR О-”у” THE 
М GOTO EXCS3sFI 
COMCL 5211 
GOTO EXC1 
*EXC3; 
1810 ” 1 CSL144,192,2,1,5,17,"55^ 43 э“ 
29035127" 273 
ы DATA1-$EO00 : 
” DATA2-$E004192442 
, І-ө 
> WHILE 1<192ғ42 
А ローDQTA1 : ©) 
$ DATA1:0)-DATA2:0) 
т DATA2:0)20 
% рата1=рата1 +1 
i DATA2-DATA2-*1 
< I=I+1 
E WEND 
x ALLPAGETE 1 
d RETURN 
”ЕХС4: 
$ CSE 1 44。184 。 つ 。 1 。 ら 。 1 の 。 "F" гле ラー ンプ 


CSE320,184,2,1,6,5, "PAGE: "3 
INP[ $327, $31, 0, 400,1841 


PAGE-PAGE1 

ЕХС5; 
CSE432,184,2,1,6,3,"77:"] 
INPL$56,$50,1,480,1841 


P 
5 


CSE512,184,2,1,6,3, "5321 "1 
INPL $35, $30, 2, 560, 1841 


CSES92,184,2,1,2,3, "ОК?" 21 
BOXCPAGE1, T1, Y1,61 
Q-GET 
z IF Өс”Ү” OR G-'y' OR ロニ デン" THE 

м GOTO EXC7 
ELSE COMCLS2LJ 

BOXECPAGE1, T1, Y1, 61 

GOTO EXC4 


. w NN ЛА КТК ЛУ т DOS ba Уу M | 


. FI 
"EXC7; 
> CSL144,192,2,1,6,10, "һе ター ント 


CSL320,192,2,1,6,5, "PAGE: "1 

INPL $32, $31,0,400, 1921 

IF RF-1 THEN 
COMCLS2( 3 
BOXLPABE 1 。 T1 。 Y1 。6] 
GOTO EXC4 


С5(452,192,2,1,6,5,"%9%:"2 
INP[ $36, $30, 1,480, 1921 
IF RF=1 THEN 
COMCLS3I ] 
GOTO EXC7 
FI 
T2-0 
EXC9; 
CSt512,192,2,1,6,53,"232: "1 
INP[ $35, $30, 2, 560, 1921 


CSE592, 192,2,1,2, 5, "ОК?" 2 
BOXLPAGE2, T2, Y2, 41 

Q-GET 

IF Qg-'Y" OR G-'y' OR 0=° 2° THE 


DATA1-$bE00*192* (PAGE1*42*T1*6* 
DATA2—$E00-192* (PAGE2*42*T2*6* 


I=@ 
WHILE I<192 
G-DATA1:1I) 
DATA1:1)-DATA2:1) 
DATA2:1)-0 
1=1+1 
WEND 
PUTL320*PAGE1*24-48*Y1,16*24*T 
1,PAGE1*42*T1*6*Y1,01 
T PUTL320*PAGE2*244-48*Y2,16*24*T 
2,PAGE2*42«*T2*6*Y2,01 
2760 BOXEPAGE1,T1,Y1,51 
2770 BOXEPAGE2, T2, Y2,41 
2780 RETURN i 
2799 


" 9 w MW Pi TS 


LINEL0,184,639,199,0,0,21 
RETURN 


LINEL 128,184,639,199,0,0,21 


T 


| 


КІМЕГ128,192,%59,199,0,0,21 
RETURN 


: 


LINEL224,184,639,191,0,0,27 
RETURN 


ИЕН 


лы E TL LC "аса . yw ow ww туни” ж 


3 
š 


RF=@ 

IF X3-1 THEN LINEC[320%PAGE,8,3 
2ӨяРАБЕ,176,4,6,0Ө1:ҒІ 

2940 ” IF Х5-2 THEN LINEL 3206*PAGE *32, 


IF Q»X1 OR Q«X2 THEN 


ч ` ч ч ч ч ч ч 


BOTO INP2 


と あっ あー っ と .。 な , な ん と PiO は 創刊 準 錯 号 (1 号 ) に 比べ て 35 年 の 5 月 号 は 4 ペー ジ も 多い . な の に 1 号 の 方 が 高い . な ぜ ノ PiO は 年 間 購 読 が 
P.S. 年 賀 状 で いい ん で すか 。 これ が 寺 ら な いと 年 賀 捧 を 差別 し た こと に な る . 
қан” 去年 賀 ハ ガキ で 充分 で すか ら ,。 余っ て いる 和信 は どん どん 送っ て ね . [P 


(栗原 健志 ) 


3030 
3040 


; FI 
3050 °? 


Ә-о-өзе 
NSCZ4, X5, 2,1,5, 0+$301 
3040 'INP3; 
3070 IF X321 THEN LINEL326*PA8E, 8, 3 
2 の xPABE 。 176,4,6,01]5FI 
3ego * IF 43-2 THEN LINEL320«PABE*32, 
7,320*PAGE*287,7,4,6,015FI 
5990 * RETURN 
5100 * BOX; 
3110 ° (ІМЕГ52Өжу1%18%48жу5,У2%24%14, 
320*41*58448473,72*24453,4,€4,11 
3120 ” RETURN 
3136 "ALLPAGE; 
3140 * 1-0 
3150 ° WHILE I<8 
3160 " し INET 16,11*1424,505, 11+1=2 
4,0,7,01 
5179 ° 
24,0,7,01 
3180 * 
3199 ' 
3200 ° 
3210, 
3220 ” 
9,0,7,01 
32306 ° 
179,0,7,01 
3240 ° 
3250 ' 
3260 ” 
3270 ° 
3280 > 
3290 ° 
3300 ' 
6*J,01 
3310 ' 
2+T 6+J 。 01 
d J-J«1 
WEND 
I-I*1 
WEND 
С5(0,0,4,1,6,1,"1"1 
CSL320,0,4,1,6,1,"2"1 
1-Ф 
WHILE I«6 
М5г52%48%1,0,2,1,7,1%ө5Ө1 
NSLE568+48=I,@,2,1,7, I+$5@1 
I=I+1 
WEND 
I=@ 
WHILE I<7 
NS[@, 16+24#1,2,1,7, 1+$30] 
М5С529,16%24%1,2,1,7,1%%5Ө 


LINEL336,11*1424,523,11«I* 
I-I*1 

WEND 

I=@ 

WHILE I<7 
LINEL16*48*1,11,16*48*1,17 


LINEL336*48*1,11,356*48*I, 


PUTL24*J*48, 165*1224, Iv 


PUTL344-J*48,16*1*24,4 


` ч ` ` ` ч ` ` ` ч ` ` ч м м 


1=1+1 
WEND 
RETURN 
ANIMATION; 
CLSE 1; ALLPAGET 3 


е ҙҙҙҺҙ2 DP OZ "FILET. 


IF PEEK(&HO3) «»&HFF THEN EXEC&HSeoo 
POKE &Hó0035,0: CLEAR 
36 SYMBOL (0,184),"<<<ҒПЕ>>>",2,2,2 
40 SYMBOL (2, 184) , "<<<FILE>>>", 2,2,6 
50 SYMBOL (1765,184),"1)LOAD or 2)SAVE or 
S)VERIFY",2,1,5 
60 A$-INPUT$(1) 
79 ОМ VAL(A$) БОТО 96,100,246 
86 IF A$%$<>CHR$ (13) THEN 60 ELSE1 の 
96 GOSUB1 60: GOSUB180: GOSUB276: SYMBOL (480 
,186),"Loading...",2,1,4:LOADMF$: GOSUB16 
e:GOTO 16 
100 GOUSUB 16 の =: SYMBOL (160, 184) 。 1) PAGEl1and 
2 2)PAGE1 3)PAGE2",2,1,5:SYMBOL (480,19 
2),"Which?",2, 1,7 
110 A$=INPUT$ (1) :ON VAL (G$) БОТО 150,140 


CSL0,184,2,1,1,15, "<<АМІМАТІОМ 
С5Г1,184,2,1,5, 15, "ANIMATION 


АМІ-ФҒС16 
I-6 
SELECT; | 
CS[224,184,2,1,4,3, "NO. "3 
NSL272,184,2,1,7,1*$9311 
АМІ1; 
CSL304,184,2,1,7,5, "PAGE: "1 
INPL$32,$31,0, 384, 1841 
IF RF=1 THEN RETURNSFI 
PABE= ロ ー 1 
С5г416,184,2,1,7,5,"7%:"2 
INPL $36, $30, 1,464,184] 
IF RF-1 THEN . 


CSC496,184,2,1,7,3, "32:"] 
INPL$35, $30,2,544,184] 


BOXEPAGE, T, Y, 62 
CSL576,184,2,1,2,5, "0K?"J 
O-GET 
BOX [PAGE , T, Y, 63 
COMCLSAtJ | 
IF 0<>°Ү” AND OC^"y* AND QC» 
THEN БОТО SELECTsFI 
* ANI2; 
> CSL80#1I,192,2,1,7,5,"( - °} 
NSE80*1*17,192,2, 1, PAGE*2, T*$5 


? 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
Ld 
> 
> 
> 
> 
> 
> 
> 
> 
> 
” 
” 
> 
> 
> 
> 


NSL80*1448,192,2, 1, PAGE*2, Y+$3 


ANI:I)?-PAGE*424T*ó6*-Y 


IF O«»*Y* AND ӨС>”у” AND 0<>°2 
1=1+1 
БОТО SELECT 
FI 
" ANIZ; 
^ LINEL240, 72, 357,111,0,0,21 
, CSE240,96,2,1,7,7, "LESC15^ "1 
CSE272,104,2,1,2,4, "STOP" 
s POKE $4F89, 6 
" ANI4: 


„150 
120 IF A$<>CHR$(13) THEN 11 の ELSE GOSUB16 
e:GOTO 50 
136 GOSUB180: 50508270: SAVEMF $ , HECO, HAC 
FF, 0:GOTO 10 
146 GOSUB180:GO0SUB276: SAVEMF $ , HE の GO 。 &H2D 
フ F 。 の = БОТО 1 の 
150 GOSUB180: GOSUB270: SAVEMF $ , を H つ D7F 。 &H4 
CFF 。 の 
150 LINE (160, 184) (639,199) 。 PRESET 。 の 。 BF 
RETURN 
60508150 
SYMBOL (160, 184) , "INPUT FILENAME ",2, 


LOCATE48, 23: INPUT F$ 
IF F$-"" THEN GOSUB160:60TO 50 


4519 


д, 


ンー スス ・ т АТ 


リス ト 4 "MAIN" 


WHILE J<=I 
PUTL288,80,4NI:J),01 
K=@ 
WHILE K<SP (0) 
К=К+1 
WEND 
J-J-*1 
Q-GET 
IF Q-$1B THEN 
LINE[ 240,72, 367,111,0, 


POKE $4F89,1. 
GOTO ANIMATION 
FI 
IF 0=%1С THEN SP (0) =5Р (ө) 一 


IF Q-2$1D THEN SP (0) =SP (ө) + 


GOTO ANI4 


POKE $0003, $FF 
CLSC] 

, АГ РАбЕГ 3 

, CODE $Bó6,$FD,$0F,$35,$FF 

'"CLS:HLTE 1: CPUKE ADDR, $02, 0,0, 73 SUB 
[ ]s RETURN 
4290 "LINEIHLT[ 1: СРОКЕ ADDR, $15, х, ZS, #1 
#, 28, 438, 748, 7: SUBE 1; RETURN 
4300 'CS:DMY1-247:HLTLJ$ CPOKE ADDR, $19, 45 
,9,0,43, 44,419,424, 6s FOR DMY=0 TO 76-1; 
ADDR: DMY) =DMY 1: DMY) 5 NEXT; SUBE 1; RETURN 
4519 "NS:HLTL2:CPOKE ADDR,$19,75,0,0,X3, 
74, 11#, 428,1, %6; SUBI]; RETURN 
4320 "PUT: 
4330 ' 
4340 °? ADR-$FC81:PX241431:PY242415 
4350 • СРОКЕ ADR, $80, $1E, Z1#, 42#, PX#, 
PY#, 0,744, 96 
4360 " PDATA=$EO0+1 92*43 
4370 ° し = の 
4380 ' WHILE し <96 
4390 ' ADR:L)sPDATA:L) 
4400 ` し = し +1 
4410 ° WEND 
4420 `° SUBE J 
4430 ° HLTE 3 
4440 " ADR-$FCB81 
4450 " CPOKE ADR,6,$64,96 
4460 ° | =9& 


HLTE 3 


4470 WHILE 1<192 ; 

4480 ADR:L-965) -PDATA:L) 
4490 し = し +1 

4500 WEND 

SUBE 1 

4520 " RETURN 

4550 'HLT:iCODE $Bó,$FDOS4,$2BFB4:POKE $F 
DOS, $80; CODE %В6, $FDOS#, $2AFB#; ADDR=$FC8 
23 RETURN 

4540 'SUB:POKE $FDOS, 0: RETURN 


ДӘЛ, 0:«/) | /);0)/ |Д -0Цц);) уң)  ңҢңҢ) uma 


220 IF LEN(F$) >8 THEN BEEP:GOSUB1650: SYMB 
OL (300, 184), "ТОО LONG !'!",2,1,2:FO0R I=9 
TO 1060:NEXT:GOSUB160:GOTO 190 

250 RETURN 

240 GOSUB160 

250 SYMBOL (160, 184); "カフ ニン ズル 7*-7* 9 tw 
375" サイ " 。 2。 1,6 

250 GBDSUB279: し LOADPR INT : GDSUB 640: GOTO 5e 
276 SYMBOL (160, 192) 。"PRESS SPACE ВАК", 2, 
1,5 

280 Q$-INPUT$(1):1F Q$-" " THEN RETURN 
299 IF Q$-CHR$(12) THEN GOSUB160:G0TO 50 
зөө GOTO 280 


111212 "esus し たよ ん ルル は) 人 人 人 人 人 人 人 人 人 人 人 A) 
00000000000000000000000000( «ҮТ m c ТҮ gw Juy 0000000000000000000000000000 
oo ^ eU 20е. 3000000000000000000000000000) 
0000000000000000000000000000 -4 >. м сс С M. UO OO OQ 
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PiO 読 者 5 名 の 方 に , 富士 通 より 写 真 の 
富士 通電 電池 カン ペン ・ モ セット を プレ ゼン 
ト し ます . な お , ЩЧ Озон E ab B 
IG QUIZ Part2 も 行なっ て いま す . 詳細 は 
広告 を 参照 くだ さき さい. 
応募 方 法 

官製 ハガキ に 「 冨 士 通電 電池 カン ペン ・ 
セッ ト 和 希望 」 と 書い て , 住所 , 氏名 。 “FB, 
職業 また は 学校 名 . 「PiO 9 月 号 」 と 明記 し 


т, 下記 の あて 先 に お 送り くだ さい (〆 切 


iX: 8 HÆ). 
(TH) 


富士 電気 化学 (株 ) 
電池 営業 部 プレ ゼン ト 係 
東京 都 港 区 新橋 5 -36-11 
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NEW TECHNOLOCY 


CODES XO... 


_ オー ディ オ 新 時 代 _ 
283 年 に 各社 か ら 商品 化 さ きれ だ CD プレ イ 
ャ ー も , 最近 で は 従来 の アナ ログ ・ プ レイ 


ヤー と 比べ て 同 程度 か が 。 ある い は 安い も の 
まだ 出 て きま も た だ 。 

ご 存じ の よう に , CD の 記録 方 式 は PCM 
жн, つま り デ ジタル 録音 で す . 数 ある 家 
庭 用 の オー ディ オ 機 器 の 中 で は 初め て 本 格 
的 に デジ タル ・ オ ォ オーデ ィ オ 化 き され だ 商品 で 
2. 

今 ま で の オー ディ オ と は 違っ て , サン プ 
リン グ と か ,16 ビ ッ ト 量 子 化 と か , 開 き 慣 れ 
な い 言 葉 が 出 て き て , 戸惑っ て いる 人 も い 
る か も 知れ ませ ん . 

と いう わけ で , 今回 は サン プリ ング と は 
何 が に つい て 考え て み ま し ょ う 。 


_ PCMS — 


アナ ログ で ある 音 を デジ タル 信号 に する 


に は , A/D 変 換 し な けれ ば な り ま せん . 


つま り , 時 間 軸 と 電圧 軸 に 関し て , 信号 を 
切り 刻ん で し まう わけ で す . 

この 切り 刻む 間隔 が PCM 録 音 の 音質 を 
決定 し て いま す . 間隔 が 荒い と , 歪 の 多い 
聞き 苦し い 音 に な り ま す が , 細か く 切 る に 
(ЕС, どん どん 音質 は 良く な り ま す . 

し か し , あま り 細 か く 切 りす ぎる と , е 
れ だ け 情 報 量 が 増え すぎ て , ディ スク に 記 
録 す る こと が で き な く な っ て し まい ます 。 

CD の 規格 で は , サン プリ ング 周波 数 は 
44.1kHz, 分 解 能 は 16 ビ ッ ト と きめ られ て 
54%. 

この 規格 が 何 を 意味 し て いる の か 考え て 
み ま し ょ う 

世界 最小 ・ 最 軽量 の テク ニク ス 「CDer」 


いも の が 多い . 
そ な い よー。 


いき な り , 
の が 出 て 来 て し まい まし だ 。 でも, これ が 
デジ タル で は と て も 重要 な 意味 を 持っ て い 
る の で す . 

この 定理 は , ある 信号 を 周波 数 f で サン 


ビタ ゴラス の 定理 み だ い な も 


プリ ング し た 場合 , f/2 ま で の 周波数 の 信 
号 し か サン デリ ング で き な い と いう も の で 
х Ж 


20kHz の 正弦 波 を 40kHz で サン プリ ング 
し ただ 場合, 区 切っ た 区 間 内 で 平均 化す る と 
図 1 の よう な 信号 に な り ま す . 四角 い 流 
有形 に な っ て いま す が 。 あと で フィ ルター に 
よっ て 図 1①⑤ の よ ょ よう な 波形 に する こと が で 
きま す . 

次 に 20kHz の 信号 ( 図 (а) を 30kHz で サ 
ッ デ サン ダグ し た と する し と 上 と 、 200021 55 
信号 が 変わ っ て し まい ます . 

つま b, 元 の 信号 と サン プリ ング の 周波 
数 ほ 上 の あい だ の ビー ト ( う な り ) が 生じ て し 
ioc, 元 の 信号 の 周 濾 数 士 サ ンプ リン グ 
の 周波 数 の 信号 に な っ て し まい ます . 

図 2 の 20kHz の 信号 を 30kHz で サン プリ 
ング し た だ 場合 は 10kHz の 信号 が 出 て 来 て し 
まい ます 。 これ で は まとも な 音 に ば なり ま 
せん . 

を そこで , A/D 変 換 す る 前 に フィ ルター 
を 入れ て , サン プリ ング 周波 数 の 必 の 周波 
数 以上 に カッ ト し て し まえ ば 。 -5o5H 
題 は な く な り ま す . 

も も みん 。 こ うし て も ピー、 ト は 生じ ます 
м, すべ て の サン プリ ング 周波 数 の 玉 よ り 
も 上 の 周波 数 の 信号 で すか ら , フィ ルター 
で 取り 除く こと が で きま す 。 

PUEQ 15 z, デジ タル 化 は サン プリ ン 
ググ 周波 数 の 以下 の 周波 数 の 信号 し か で き 
ませ ん . 実際 に は , どん な 切れ 味 の 鋭 い フ 
ィ ル ター を 使っ て も , ある 周波 数 以上 の 成 
分 を スッ パリ 切り 落と すこ と は で きだ な い の 
CT, 102 ぐ で らい の 余裕 が 必要 で す . 

27, NT RE RN 3*7 
タル の 角 が と れ て , きれ いな 波形 に する こ 
btt b d. 

5, CD の 話 に 戻り まし ょ う . 賢い 人 
は も うわ か っ だ と 思い ます が ,。 サン リン 
人 ググ 周波 数 が 44.1kHz だ と , 再生 で きる 周波 
数 の 上 限 は 10% の 余裕 を 入れ て , 

44.1kHz х 12 x0.9=20kHz 
ЕТЕТ TT. 

一 般 的 な 常識 と し て の 人 間 の 可聴 周波 数 
は 20 一 20.000Hz と る れ て お り , ТЕЛЕ 
の ォ オー ディ オ 機 器 が 20kHz を 目標 に し て い 
る こと を 考え る と 。 20k 昔 2 まで フラ ッ ト と 
いう CD の 規格 は 充分 な 値 ど と 思い ます . 

(еі, アナ ログ ・ デ レイ ヤー で も 条件 
る さえ ぇ 良けれ ば 20kHz 以 上 の 再生 の 可能 性 は 
あっ た だ の で すか が わが, CD の 現 規格 で は そう い 
う 可能 性 は まっ だ く あ り ま せん . 


最近 PC-1500 の プロ グラ ム が 減っ た よう だ 。 し か も 載っ て いて も CE-155 と か 
と ゆー わけ で 
P.S. Tears For Fears は よかっ た . 
イト し て ウォ ー ク マン を 買う ん で ぇ ) 


図 (а) 


図 2 (b) 


今回 は 時 間 軸 に 関し て 音 を 切り 刻む と ど 
ちな が と いち EED TEITE 
だ が , 次 は も う 少 し デジ タル 化 の 分 解 能 の 
問題 と ダイ ナミ ッ ク ・ レ ンジ に つい て 考察 
し て み だ い と 思い ます .。 それ で は っ と / 


カナ ・ テ ー ジ と か 僕 の 持っ て な いも の を 使わ な いと で き な 
プログ ラム も し で きた だ ら 送 り ま す . それにしても, テス ト は ある わ ,。 クラ ブ の 合宿 は ある わ で 自分 の 時 間 が も 
P.S.2 Howard petites Young も よろ し く /PiO に も 洋楽 ファ ン を 増やそ う / (2 


(あい らん ど ふ ぃ いる ど ・lsland Field) | 


PC- 1 


ボケ コン パイ ラ 


一 氏 家 一 沢 


ポケ コン 初 ( だ と 思う の で す が …) の 3 DH 
ー レ ー ス で す ノ / ポケ コン バイ ラ の 少な い 
ХЕ ОЗОН СҰҒУҒА, ЕКЫ 
LCD の た め , 本 家 本 元 の 「 走 れ ノ スカ イ 
ライ ン 」 の 足元 に も お よび ませ ん が , くね 
くね と 曲り くね る 道 を 見 た と き , あな た が 
ポケ コン の 素晴らし さ を 再 認識 する こと を 
確信 し ます . 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| ポケ コン パイ ラ 1251 


と に か く 面 白い ノ ポケ コン パイ ラ 
коо, よく て ここ まで で ぞ 
きま し た ね . さす が は 作者 . (Ko) 


Шы 


RU. УЗЖУРОСКФТГИМУИЯГС ТР 
きい. 長い 行 が あり ます が , 途中 まで 打っ 
て [ENTER] を 押し , また カー ソル を 後ろ に 
持っ て いけ ば 入力 で きま す . 

次 に , ポケ コシ フッ パイ オラ 1281( り スト 2) ぞ を 
ロー ド し (MEM=2771 を 確認 し て か ら ), 
CALL&BBO 〇 で コン パイル し ます . 


ШИЛІ! 


[DEF |[@| で 実行 で す . "?" が 表示 る 
nib, レー ス な ら 1, 単なる ドラ イグ な 


ら 60 を 入力 し ます . 画面 お よび 操作 キー 
01, 205 ЧУУ: | 
注意 すべ き こと は , 複数 キー は 読め な い 


Ба оТ РКА ТУ ЧЕМО 
ー を 押し な が ら 右 に 移動 な ど と いう こと は 
で きま せん . まだ , スピ ー ド は 最高 時 速 
180 キ ロ , 最低 90 キ ロ と いう 設定 に な っ て 
E Э: 


時 間 は で きる だ け ス ピー ド に 頼ら な いよ 
うに は し まし だ が , 


時 計 を 内 蔵 し て いな い 


図 1 画面 表示 例 


図 2 操作 キー 
m D nu 


アク セル プ 


悲し さき で, レー ス ・ モ ー ド で は 面 が 進む ご 


と に 速く な っ て し まい ます . 
次 に , 各 モ ー ド の 説明 を し ます . 


ІНННЕННІ 


1 キロ 進む ご と に 地平 線 が 下がっ て きま 
す が 。 これ に より コン ピュ ー タ の 身 理 する 
量 が 減る を だめ, どん どん 速く な り ま す . Ж 
の 端 に 衝突 する だ びに 約 3 秒 く う の で , Іі 
が 進む た な びに 速度 を 落と すこ と を お 勧め し 
£d. 

を し て , 5 キロ 走り きっ た と き の タ イム 
が スコ ア で す 。 ゴー ル し た 後に 画面 は 止ま 
も の の で ニア を 先 だ らら デレ イオ イ み じじ て で だ 
きい . Ef, ゲー ム 中 に や め だ く な っ だ ら 
ENTERI を 押し て くだ さい . 

な お , スコ ア は 最初 6, 7 分 で らい で す が , 
着実 に 縮まり ます . ちな み に , 私 の ハイ 
スコ ア は 2 分 28 秒 で す . 


ausi 


ENTERI を 押す まで 終わ り ま せん . の ん 
[КОК е а Ы SS や ーー ネッ 
モー ド の 練習 に も な り ま す . 

どちら の モー ド で も , ぶつ か り 処 理 の 仕 
方 が 良く な いよ う で , 端 と 車 の 間 が 3 ドッ 
よ 以 上 ある の に 衝突 し て し まう こと が 。 > 
な か ら ず あり ます . で きる だ け 中 央 を 走り 
まし ょ う . な お 道 は 乱数 で 決め て いま す . 


Шын 


84 年 10 月 号 の PiO(PC-8001 版 「 走 れ / 
スカ イラ イン 」) が 入手 で きず , '85 年 6 月 号 
の 1I/O(MZ-1500 版 ) を 参考 に し だ の で す が , 
どう も 2 回 積分 と か が 出 て き て 良 《 理 解 で 
き な い の で , 非常 に 単純 な 方 法 を と り ま し 


> 
-. 


道 の 幅 は 上 か ら 順 に , 5, 9, >>, 29 に 固 
定 し ます . 配列 8) か ら 29) まで, 手前 か ら 順 
に 真っ すぐ で な 6 ら 60, 右 カ ー プ な ら 61, 左 カ ー 
ブ な ら 一 1(255) を 入れ , 手前 か ら 1 つ め ま . 
で の 和 を 0) に , 2 つめ まで の 和 を 1) に, 4 つ 
め ま で の 和 を 2) に , と いう 具合 に 6) ま で 代 
入 し ます 。 し か し ,。 この まま だ と 手前 の 道 

表 1 変数 表 


今回 の 道路 の ずれ 
前 回 の 道路 の ずれ 


時 間 [ 秒 ] CF) 
時 間 [$5] (E) 
時 間 [分] 

面 

スピ ビード 


m 


m 


道路 表示 

衝突 判断 , 時 間 か せ ぎ 
道路 処理 

左右 移動 処理 

アク セル , プレ ー キ 処理 
キョ リ 処理 

時 間 処 理 

乱数 

衝突 処理 


149 


pio 


が 動か な い の で , 表示 する 際 に 0) か ら 6) に 
Та, A を 加え て いま す . A は 1) を 1 回 ご と 
に 加算 し て お り , [Z|] キー を 押せ ば +2, [9] 
キー を 押せ ば ー2 る れ ま す . 

本 当 は , カー ブ の 度合 は せめ て 一 3 一 3 ぐ 
らい に は し た か っ た の で すか が か, 何しろ 縦 7 
K tat toba аА 


|| Bier 


この ゲー ム は ポケ コン パイ ライ で 作成 され 
だ た だめ, 718 バ イト と いう メモ リ の 限界 か 
ら ず いぶ ん 不 親切 な も の に な っ て いま す . 
5 バイ ト を 得る た だ ため, わざ わざ スピ ー ド を 
落と し だ 箇所 も ある くら いで , スピ ー ド , 
使い 易 さ より , 省 メ モリ を 優先 る きせ て いま 
T. ni, BAS1IC 都 分 も コンパ イラ の 
ソン ジー ス を 別々 に し だ く な いと いう , 筆者 の 
頑 迷 と も いえ る 思い 込み も 相当 に 影響 し て 
いま すず; 

CRI A ОУ = RE BASIC 
を 分 割 し た 場合 の 改良 箇所 を 以下 に 挙げ ま 
ад wt 2 op ip i> > XA 
ト の メモ リ が すでに 限界 に 近い の で 
BASIC 部 分 の 改良 が 主 に な り ま す . 
⑯ 街 突 時 の 速度 の 初期 化 ( コ ン パ イラ ) 

120 行 の 0A の 後に , 7Ү:2457:РОКЕТ79,0 
を 加え ます . 
② タ イト ル , ハイ ・ ス コア 等 (BASIC) 

ハイ ・ ス コア は 0⑳) 一 29), A— ZJ й 
域 を 使い は し ょ う . で スト 5 位 ま で 表示 す 
る と 面白 に の で す が , 9@ の 理由 に より へ 
Aoc ат ОКО Я L4. 
MODE を 聞い て くる とき, "МОРЕ (0, 
92 "等 と さり げ な い サ ービス も 重要 
CT, タイ キッ ル は ば は, 当然 グラ フラ フィック 表示 
«ЖЬ 14 S >” cux». 
コー ス ・ エ ディ タ (B, コ ) 

残り の 変数 エリ ア に POKE 文 で コー ス 
の デー タ を 書き 込む たと, その と お り の コー 
ス が 走れ る わけ で す . 手軽 に コー ス が 書き 
換え られ る の が 大 き な メ リッ ト で す . デー 
タ 構 造 は 次 の よう に すべ で き で し ょ 2 う . 

1,20,0,51, 一 1,9,5 

例 は 。 右 カー プ 20。 直進 51、 左 カ ー プ 9 
ле талант, Фа лак ы 
> パイ ラ は これ を 読み 取る よう , 120 を 書き 
変え る 必要 が あり ます . カウ ンタ が 必要 に 
な り ま す が , 変数 表 か ら 使 用 し て いな い 変 
数 を 選ん で 使っ て くだ さき さい. 
@⑳BEEP 音 選択 機能 (B , コ ) 

これ は 重要 で す . 音 が 出 て は 困る 場所 で 


18:*C: ON JI: ON 74-JI: HE 
1+JJi IF I+I+J<=34C: 


371):1+II:0J: IF I<= ЖЕР: 1+HH: 


6С GOTO G:*H: ON H*EF: 
жу: IF 8+А>16Х: ВЕЕР 


ON a:ZI:*U:I-1I: IF 

【 く >255U 

:LET 81:0J: 80K: 0S: *6:5 

+1)5: IF K>0B:37+S+ñ 

N: J2 *BH: 6-JF: 2+F+FE: 

IF М<-НЕ | 
81:M6-JF:2*F*FE: IF N<= 


2:14JJ: JK 
60: *B:K-1K: IL: 14II: IDL) жі: IF С<=254Р:1+рр: W2: 
: IF І<=МА 
70:8B: 10 *à- 37A: *R: 


INKEY$ I: 
BEEP ON 1: 


40:жҒ: ON H-EF: OFF 1+H 
IF МНЕ: Қ: IF 152181: IF Y= 


OFF ИСІЗЕҒІНІН 
50:жЕ: IF HONH:*6:37*5J 


IF 1=05: 


表 3 


ーー — © — -- O O ~ -~ -- 


1 
2 
3 
3 
3 
3 
3 
2 
1 
0 
1 
0 
1 
2 
3 
3 
3 
2 
1 
1 
2 
3 


ポケ ュ コン を 使用 し て いる 方 は , 少な く な い 
は ず で すか ら (BEEP ON の 所 だ け な ら 簡単 
に で きま す ). 

その 他 (B, 3) 

РОКЕ&ЕЗбА ,77,66,119 C, HIGH- 
LOW が わか りや すく な り ま す . キョ リ の 後 
ABK な が が と た する の も よい で しょう. 

それ か ら , これ は 改良 と は あま り 関 係 な 
сост», 少な い メ モリ を マル チ ス テー 
Каа も に も で も まめ が なの, 
これ を バラ バラ に し て REM 文 を 付け る < 
らい の 余裕 を 見 せ た い も の で す . 

他 に 衝突 時 の 反転 , 音楽 , 継続 機能 等 が 
あれ ば な お 良い の で す が , 無理 で し ょ 5. 
も っ と も , 制作 当初 は トン ネル , 他 の 車 , 
周囲 の 風景 まで 作る つも り だ っ た の で す が 
(マシ ン 語 な ら 可 能 で し ょ う ). 


ШІ 


私 の ポケ コン は , 中 央 の 液晶 が 割れ て い 
る の で , も し か し た だ たら 道路 の 右端 が うま く 
処理 さき れ て いな いか も し れ ま せん . 

ео, この プ ブログ ラム は ポケ コン フ \ 
イラ を 一 部 (1 バエ イト ) 書 き 換 えて いる の で, 
注意 し て 〈 く だ きい (これ に より , スタ ー ト 
時 に 画面 が クリ ア ほ され な い ). 

こん な ゲー あ で 6, ユニ ジィ パイ ラ 記述 可 
能 だ と いう こと が わか っ て 頂け だ た と 思い ま 
2. ボケ コン パイ ラ は メモ リ が 少な い の で , 
マル チ ス テー トメ ント に し な く て も 速度 は 


IF I4? 73K: *D:144-I-I 
«Ай: GOTO L 


eL:Y-1Y: ON 79Ү: 
GOTO N:*I: IF I<>9L: 
IF Y27L: ОРЕ 79Yi1+Y 
Y:*N:S*Y*Y2 


19808:*P:1+CC;:20+Y+Y+Y+QI: 
IF І200:1%К/60%ТТ:1% 
R968R: CALL 17: 
PRINT T: CALL 19: 
PRINT В; 53%: ж0:10 &С100 
110:RND 13K: IF K?2W:K-1 
М): GOTO V:*H:W-1I:I 
GOTO V 


Bc 列 


-39-2-1012 3 


変わ ら な いと いう , コン パイ ラ の メリ ッ ト 
が 生か せま せん . メモ リ が 少な い 原 因 は, 
ラン タイ ム ・ ル ー チ ン が コン ライ > 本 体 
に 含ま れ て いる (これ は 筆者 の 無知 か ら 生 
じ な あ も の で サラ メン な るい だ) X 
ブ プ ジェ クト 実行 時 に も コン パイ ラ が 必要 で 
あ る. 
ンー ス の 上 に オブ ジェ クト を 書け な い . 
な の で す が 。 それ で も リア デル タイ ム ・ ゲ ー 
ム は まず 不可 能 と いっ て も 差し 支え な い 
BASIC じ イン ター リタ に 慣れ だ 人 々 に と 
ос, ボケ コン パイ ラ は 福音 と な り 得 る 可 
能 性 を 持っ て いま す .「 な り ま す /」 と 断 
言 で き な い の は , 少な い メ モリ に 絶望 し た 
だ めか , ひど い 文 法 に あき れ だ だ めか 。 б 
然 ア プリ ケー ショ ン ・ ゲ ー ム が 発表 きれ な 
いか ら で す . 
1251 ユ ー ザ ー の 皆さん / 
テラ の が ゲ ダーム を 作り 9 まだ に ょ う 、 
3 参考 文献 
早川 栄 太 : “走れ ノ / ノ スカイライン", I/O, 
85 年 6 月 号 


W е >К. 


NIAI] 走れ グセ コイ ライ ン YR -R p ВИ 


&C985&FF: INPUT Z 
910:РОКЕ &F823, 64, 96,96, 

96,564: POKE &F85B34 

: POKE &C695:2: CALL 


920:G0T0 920 


CALL 22: PRINT D: IF || 120: *X: S4RR:AB:0R: ВЕЕР 


P=9PiM-XMIX-1XI IF X 


=1S:9Ii*Ji OFF 15-Х: || 980: "G" CLEAR : 
IF 1=71р: 1*II: IF 15-74) 


99,0: 6070 R:*S: END 


POKE &C6 


9С,29,6,7›245: POKE 


Robin さ ん へ 一 言 な の で す が ( ず ー ず ー し い ), で きる だ け 早 く PCUC の 会 員 募 集 を 再開 し て くだ さい . 話 は 変わ る けど ,。 ビデ オォ で TT・F・F 
(TEARS FOR FEARS) の SHOUT を 見 て , 感動 し た の は 僕 だ け だ ろう か ? 
BASIC の 混じっ た プロ グラ ム を 入れ られ な い . 


Р.51 マイ クロ カセ ッ ト テ ー グ を ぶっ 壊し だ た ので,。 マシ ン 語 と 
Яу ЕН ЖАСКА きろ 


Р:5 ООСРАЗӨРКА ЕЗУІ О ЭУ 
(一 ゅ じ わ い ) 


9i0 


С626082602572624:8Ғ 
BFF8 6731280B82782602:6D 
C999 С026028Ғ26243489: ТЕ 
C998 70080588059267578:21 
C010 280702С826885926:20 
C918 5В7555288502442С:04 
C020 5245280502452С2В: 40 
C028 432807027803D12C:EC 
C939 22432897927893E6:F7 
C938 2C19754928850246: 78 
C840 2С11750428050247:2С 
C948 2C99759928139278:F8 
С050 83F689DB8ADADBDA: 76 
C858 4352ВААТ8С0662]АЕ:92 
C969 0589700028110757:95 
C968 6742284706020327: CA 
С078 86370602DB263711:8E 
C878 986378C8C8125F82:66 
C888 91DBDF78C9FF8C69: DE 
С088 9983379979BF4B85:C2 
C999 699961CSS169896 1 : 98 
С098 D144289459799125: 29 
COAG 8557840250088502:12 
COBAS B8DB860202DB8782:81 
COBO C1DB3710F800803B:16 
COBS 92991F11491F3719: D8 
C9C9 CSD999CF92991F37: BC 
C9C8 19B899992F92991F:18 
CBD 378869999998D2DA: D3 
СӨП8 2840244015А08417С:52 
COEG С006598508577400:Ғ8 
C9E8 395D88FF40457DC8:57 
COFO EC80DB83DB377400:58 
СӨҒВ 59604570С0Ғ84457:90 
C100 78C97R9999999999: B2 


жән!) Д-р ポケ コン バイ ラ 1251 マシ ン 語 リス ト mem 


BC49 BC87003B2426417C:85 CBD7B885983DB37: 2A 90078253268763C6:C2 
BC48 BC44833778BC8700:75 || BD88 4879BD7F67AE28A8:E2 | | BECO 289663C528968663:FF 
BCS9 5С0501240226417С:ЕВ BD98 78BFAA92782692BD:49 || BEC8 CE268D24671D7EBB:66 
ВС58 BC53833778BC8799:84 || BD98 2602442624675438:8Ғ || BEDO 8C4220752467FF 28: BO 
BC68 3C0501245426417C:73 || BDA 02052СҒВ59676420:7С || BEDS 0010С69Е522419С6:С0 
BC68 BC63833702F885DB: 33 BDA8 187504380Е0540С2:Ғ4 || BEE9 9F5279BB8C823726: 90 
Ai мыны” BDB9 75047DBDAF2478BD:D1 | | BEES 2678С08206576757:ҒВ 
BC8 27417CBC7D833702:09 || 8088 E95B744DB79BDE9EA || BEF9 2887865767573820:82 
BC88 F885DB59987DB8460:F7 BDC9 67C82A9F93413478: 58 BEF8 67F83B0F865767F8:65 
BC99 99866999973778BCi58 || BDC8 BDE95B7564934979: 8D || BF99 3B15758927969657:CF 
BC98 8225085778ВС4205:В84 || BDD9 BDB993423478BDE9:FB || BF98 78BF3B9991821827: 34 
BCA9 5327846778265567:D2 || PDD8 5B75C8934979BDB9:C1 || BF19 DA26C33830202837:C8 
ВСА8 3C3R97699961B745: 3A ВЕЙ 850243DB8482C3DB:C9 || BF18 87699961C5516999: BE 
BCB9 DBDB78818582F8DB:81 BDE8 79BDF38582C50B84:D4 | | BF29 61D1442688507081:69 
BCBS 832710C079125F52:C6 || BDF9 92CFDB92F887DBDA:E2 || BF28 6708262283592737: BE 
BCCO 69996111DF574329: イ 4 || BDF8 8482001482148214:C7 || BF39 2467513410676924: 2D 
BCC8 0260010Ғ57452902:07 || BEBO 84148C594286DB63:82 || BF38 1975502410B7FE80: D7 
BCD9 C32919833763932:46 || ВЕӨ8 49216999494A118:41 | | BF49 9288184329945B37: 4 
BCD8 2378115958125FDB:01 BE19 97R1198C63373895:24 | | BF48 812C8E822C0B822C: 27 
BCE9 DF833778BCF84753:SF || BE18 7805832770448337:9D || BF58 98842C95852C9286:F6 
BCE8 3778BCF8340B465B:13 || BE29 2427242724272427:2С || BF58 92583229991719BF: 92 
BCF9 0845555700000000: АА BE28 24278C63443880571:2C || BF69 928981874498BDB19: 94 
BCF8 8467787DBF4B673C:8D BE39 9583376999833767:49 || BF68 C69E577560B0DB11:6C 
BD86 3897699961B745DB:D9 || BE38 DE28860227262C7E:15 || BF78 9F570682359640F45:64 
BD98 DB70018502F8DB02:08 || BE49 67C9282578BFAN92:69 || BF78 7440B2DBB1D65874:98 
BD19 080D054C37DBD1283:BC || BE48 782602ВЕ26025226:ҒЕ || BF88 49DB78499C7811E9: 48 
BD18 DB253767CD289692:9B || BES8 2C6C621820F65944:D8 || BF88 781Ғ447502290601:82 
BD29 Е9542С0867СС2865:11 || BE58 444444679C3A9559:D7 || BF98 91374C4C4C4C1155:CE 
BD28 92E33478BFAN2467:85 || BE69 83B745598CDB8337: 79 BF98 62625F6236111159: 36 
BD38 1B38020502592682:DD || BE68 6704387867882812:18 || BFA9 5E11111111114C4C: 4B 
BD38 342678BFAN925B26:BE || BE78 927826921F269244:2D || BFAS 4C4C89929999921E: 43 
BD48 827826028C265B26:05 || ВЕТ8 26028226020B262C:80 || BFB9 886999938924754A:CE 
BD48 2CF5593410C07700:F5 || BE88 1E67A1289C927826:FR || BFB8 201B740626170000: 0E 
BD58 0182188560008460:64 || BE88 82C82682B3262C2E*:1D BFC9 DA886999443B7B41:FH 
BD58 9914821484148214:D8 || BE99 670258020578ВҒАА:59 || BFC8 2995598344388388: 94 
BD69 8414821482148414:5С || BE98 24673438929578BF:35 || BFD8 7991201E8871913A:F9 
BD68 841177195B80DB03:DE || BEAG 8407897000288205:79 BFD8 090202260826052С:64 
врте 80020085DBD684DB:9B || BEAS 246721288982BF27:D5 || BFEQ 1775212B9C74162B:2D 

BEBO 0218262С09674058:63 || BFE8 97486DA82192692: АЕ 


EBOG 78C9BF78C9C878C9: 2F 

ВВӢЗ 8279ВЕ0424670028:30 
BB19 4D78BFRR97965767:F9 
BB18 DB2884072C0402DB:1B 
BB29 26923426243478BFs 1 1 
BB28 848025B260245265B:F5 
BB39 6734289592FE2C18: 9C 
BB38 6784280502FC2C10:52 
BB49 6732289592FF2C98:FB 
BB48 67837CBF4802FD26: 92 
ВВ50 2624679238020578:ҒА 
ВВ58 BF30262C56673728:5D 
BB69 130678BF30875934:94 
ВВ68 0001195B870B8653: B8 
BB79 072С406707280В02:Е6 
BB78 F9262678BF30262C:FE 
BB89 3267C1284978BFRR:R3 
BB88 0278260280262467:109 
BB99 88280502ЕВ2С0С67:41 
BB98 18289592E92C9495: SC 
ВВАй 92842624671C289E: 69 
ВВА8 2405670058056710:51 
BBB9 292C79BEBD95928C: DC 
BBB8 2692692692992692: 18 
BBC9 83262D1167DB281B:6C 
BBC8 2467CC289F78BFAR: 6F 
BBDO 027826028С260205:5В 
BBD8 2620280502В85479:Е9 
BBE9 BD2B6708288B02F8:54 
BBE8 262678BF3926231: 43 
BBF9 67CE28060290342D:62 
BBF8 1967RF281378BFAR: 4B 
BC99 92592692782692BC: DF 
BC98 2692962679BE9867: 1A 
BC19 9B7CBD1B24676528:07 
BC18 95924C2C18675428: 7A 
BC29 95925C2C19676228: 99 
BC28 05026C2C886T75CT7C:E6 
BC39 BF48923F34927826: 1C 
BC38 02BC265B26208C78:96 


BD?8 886880084143806841: 05 


@ ば ん ちゃ ん ず の BANCHA 


猫 同志 社 さ ん 


151 


PC-1250/51/55/45 


BASIC 十 マシ ン 語 


TENNIS 


昔 懐か し い テ ニス ゲー ム が , 5, 貴方 の 
PETRON Z 

秋 の 修学 旅行 に は , ぜひ これ を 持っ て 行 
っ て, 友達 と enjoy し て くだ さい . 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


速 さ は な か な か で す が , ラケット に 
当たっ た の に ボー ル が 行っ て し まう 
と が あり まし た が … ? (Ku) 


31/582 de OE e 
くだ さい . 50/45 ユ ー ザ ー の 方 は , BASIC 
部 の 10 行 の CALL 廊 を ,CALL &С100 t Ж 
ぇ , マシ ン 語 部 も 変更 点 を 見 て 変え た 後 
Az&C1002:6 AJjUC4 72S v. 
終わ っ た だ たら, マシ ン 語 部 は , 
CSAVEM"TENNIS AP:&BDOO(C1OO), 
8. CODC(CADC) [ENTER] 

(括弧 内 は 50/45 の 場合 . 以下 同じ .) と し て 
Фатыр C о k: 5. 


[pEF|[A| で 始ま り ま す (直接 CALL& 


BDOO(C1OO) [ENTER] - と する と 画面 が 崩れ 
ます ). そし て 何 か キ ー を 押す と ゲー ム が 始 
まり ます . 

arvi x =l], に に] で, 左 プ レイ マー 
5а, [| で ラケット を 上 下 に 動か し , >$ 
と は た だ だ ひだ た すら ボー ル を 打ち 合っ て 《 だ 
Av. 一定 の 時 間 が 過ぎ る と ボー ル の スピ 
ー ド が 速く な り ま す . そし て 5 点 先取 し た 
方 が 勝ち で す . 

ほとん ど TV ゲ ー ム の テニ ス と 同じ な の 
Сс, 少し や れ ば コツ を つか め る で し ょ う 

な お , 作者 の 技術 不足 と 中 間 試 験 の た め 


そし て 王 7,.800 ほ と いう キレ モノ で す の で , 
入れ て や っ て くだ さる さい. 


表 1 内 部 RAM ワー ク ・ エ リア 


左 ラ ケッ ト の 状態 

右 ラ ケッ ト の 状態 

(&03, &06, &0С, …, &60) 

ボー ル の 位置 (&F8--) 

ボー ル の 状態 

(&01, &02, &04, …, &40) 

ボー ル の 横 方 向 の 向き を 示す フラ グ 
( 0 : 右 向き , «ҒҒ: 左向き ) 

ボー ル の 縦 方 向 の 向き を 示す フラ グ 


( 0 : 下 向き , &FF: 上 回 き ) 


ボー ル の 旧 位 置 

ボー ル の 進み 方 を 示す フラ グ 

( 0 : ノ ソン 。 1:, &FF: が の) 
ボー ル が 1 移動 する た びに 1 増す カ 
ウン タ . ボー ル の 進み 方 を 制御 する 
た め に 使用 

ラケット と ボー ル が 当たる た びに 1 
増す カウ ンタ . スピ ー ド を 変え る た 
め ( 6 に な っ た と き ) に 使用 

スピ ー ド 調節 の た め の ル ー プ 回 数 ( 平 
常時 :&55, 高速 時 :&30) 

左 プ レイ ヤー の 得点 

右 プ レイ ヤー の 得点 


с, サー ブ や ボー ル を 打ち 返す 方 向 な ど は 
すべ で て ラン ダム と な っ て いる の で , 狙い 打 
ち は で きま せん の で 悪し か ら ず . 

また, 音楽 演奏 中 以外 は [BRK | キー, Ж 
源 ス イッ チ が 効き ます . あと , な ぜ か ある 
キー を 押す と 左 ラ ケッ ト が 動か な く な っ て 
し まい ます (捜し て みて ). 僕 は この ぉ か げ 
С, まだ 負け た こと は あり ませ ん !? 


こつ いて 


自分 で は 「 美 し ( JES ISO DOE 
解析 は 楽 び と 思い ます (する 人 は いな い だ 
ろう な ぁ ー ひ ー). 7272, 1 箇所 未定 義 命令 を 使 
っ て いま す の で ( 鐘 BDB7(C1B7)), を こ 
は 文 南 2 を 参考 に し て く 《 く だ さる い . 

また だ, &BD52(C152), &ВЕЕВ (С2ЕВ) 
を 増減 する こと に より 。 スピ ー ド を 変え ら 
れ ま す . 前 者 は 平常 時 で , 後者 は 高速 時 で 
す ( 小 きさく する 程 速 く queis 

きる ら 6 に , 勝つ と き の 得 
iX, &BF12(C312), 


点 を 変え だ い 方 
&BF20 (C320) を 1 か 


ら 59 ま で の 数 に 変え て くだ る い 。 


タイ トル 表示 & 初 期 設 定 
メイ ン ・ ル ー チ ン 

ボー ル の 移動 & 表 示 な ど 

左右 キー 入力 & ラ ケッ ト 移 動 な ど 
[ВЕК | キー と モー ド ・ ス イッ チ の 
チェ ッ ング タメ イン 
ポール と ラ ケ ゞ 


ルー チン へ 
MESEDE 

3 DEEE _ 

スコ ア 計 算 & 表 示 

ゲー ム 終 了 時 の 処理 . タ イト ル 表 


表 3 1250/45 へ の 変更 点 


BD 8 D, ED 

BE 8 6 

BF22, 5F 

BE 0 2, 6B, 7 0, 89, 
93, 9B,A5, F7, FE 
BD0 6, 09, 10, ЗР, 
58, 6E,9F, FA, FF 
BE77, 83, C7, D5 
BF 0B, 0E, 19, 28, 
5C, 79,93, 9C, CD 
BD27, 9C 
BF59, A8 


人 格 崩 壊 が 起こ り そう な の で あま りお 薦め 
で きま せん が , &BD43(CI43) e£ &7F に 変 
ぇ えれ ば 「 壁 打ち 」 が で きま す (うっ , 孤独 
pop 

Фс, PBERACo66gv9iv5J5 
は , &C0A2(C4A2), &СОВА (САВА) を と 
も に &FF に 変え れ ば 耳障り (?) な 音楽 は 鳴 
本 さだ なっ の ЖУ, 

を の 他 。 ラケット を 小さき くす る な ど と いう 
こと も で きま す の で , 根性 の ある 方 は や っ 
ав асам 


Bi {E DO.H.S СЭС U72 2» (RE 
も 入力 し て な か っ つ だ ⑳ し で ) ? 

編集 部 評 で , 「 ス トー リー に 無理 が … 

と 言わ れ て し まっ だ (も っ と ds スハ 
イ .) の と , 綴り の ミス が あっ だ の で ヒン ト 
と 訂正 を し だ いと 思い ます 。. 


P Tele Star( だ っ た よ な 綴 り は …) に つい て m5 フ ァ ン と し て 一 言 . m5 の RS-232C こ インター フェ イス (SI-5) に は , 秀 れ だ Terminal ツ フト が 付 
いて いま す (8K バ イト ROM に 入っ て ます ). 当然 ANK の み で す が , 300 一 1200 ボ ー 対 応 で , 
ー ミ ナル と いう こと で は PC-6001(mkII ) と 対等 (or 以上 ) と 思わ れ ま す の で , m5 も TELE STAR 


パリ ティ や ワー ド 長 も 自由 に 設定 びき る も の で す . 


(S 台 の 講師 と 同じ と ころ に 住ん で いる こと が 判明 し て 恒 民 し て いる Dannop) 


訂正 

サブ プ プ ログ ラム の 905 行 の DATA 文 
H, "G/B/LFU' 2, *G/B/LJU"* に 訂正 
UT. が ыы 
ヒン ト 
Q^:- (BREAD) は 自分 で 食べ て は ダメ . 
テニ スコ ー ト の 人 に …. 
@ 余 分 な 物 を 持っ て し まっ た だ たら THR 
(OW) で 捨て よう . 
ハン マー(HAMMER) を 手 に 入れ だら , 
ドア (DOOR) を 叩い て (HIT) みよ ょ よう. 
@⑳ 体 育 館 (GYM) の リン グ (RING) と は , 
バス ケッ ト の ゴー ル の こと で す 。 そう 言え を 
ば どこ か に ボー ル が あっ だ よう な 気 が す る 
な あ . 

この くら い 書 け ば きっ と 解け る で し ょ う .。 


3402F T DB8582BF DB: 79 
T8BF6S8FDaD6eTOTTE: 95 
BDia ВР6110С7800й017й02:Сй 
8018 111F11C80280852F1:4E 
BD28 8Ғ840247088502С0:9Е 
В028 D88580244DB8702F8:03 
BD38 0802115424262Р035: АА 
BD33 АВБЙЙЙАСБЙӢЙТӘВЕ: 4E 
BD4a 8880020СПВ81020С:С0 
| BD48 0ВАЗӢ20Й10ВАЭ6ӢЙЙ: бА 
BISA HH9255DBR7699978: SB 
BUSS BF7BHZ676E3H9992:F3 
BD68 191084460002С0702: 20 
BD68 220ВА46ІРРТЗВР 78: B4 
BD?à R36T6E3H999294DBi 9C 
BD?78 ñ56080062C078210DB:25: 
BD88 RS61FF19F814R953: 14 
BD88 1127815510В8095482:2Е 
BD98 5310Ғ80й085558402:27 
BD98 9FDBSSU2C8DB78BF:D3 
BIAG Сй082598608876505:49 
BDA8 58й6886201580082:52 
BIBO 59H4639938934372: 58 
BDBS 42H2UBH76399389Ri 9B 
6301280688620158:05 


まだ の 人 も ぜひ や っ て みて 85 年 5 月 号 で 
す 。 友人 達 に は 大 変 有 ろ け まし だ よ ょ ) ア 


し て くれ た 丸山 和則 君 あ り が と う . 

も ころ で マシ ン 語 で ゲー ム を 作る と き に 
lk, で きれ ば 内 部 ROM 以 外 は 使わ な いよ う 
人 区 まだ に まう と こも う チ れ ば 他 の マン ジン で ぁ 
動か すこ と が で きる の で すか ら . 

で は …。 

3 参考 文献 
1) ポ ケ ュ コン ・ マ シン 語 入 門 。 LES 


2) 中川 恒明 : “SC61860CPU の 未定 義 命 令 
2 TENNIS г/с Ud odium 


JCS 2083598563003885:61 
BDD8 D1D22C03D150n3DB:7B 
BDD8 639128968569992C:C3 
BDE9 9863492894A561FF: DC 
BDE8 A85942DB10BDF 3A6: 84 
BDF9 5310Ғ80004006265:34 
BDF8 BF7FBF00632D7DBF:19 
BE99 9619BE98A25319F8:19 
BEOS 00855588594ЕҒҒ45:89 
BE19 2994125C69995D59: A8 
BE18 9294DBDD4CA93466: 44 
BE29 2938996393389559: 5D 
BE28 D1J2DB5B66893899: 99 
BE39 636058055901580В:5Ғ 
BE38 125C69995D599291: 7E 
BE49 DBDD4CA134660838: 7F 
BE48 96333805590102: A8 
ВЕ5й )858660128096360:01 
BESS 3805590150DB10F8:04 
BE69 1480551127015382:05 
BE68 63157EBE8863267E 43 
BETA BE9R4EFF6B987CBFI53 
BE78 6112508288DBDDCC:5E 
BE89 644877CBF6179BDA1:DE 
10ВЕ91835510Ғ814:71 
26007ЕВЕ74846000: 8A 


2Z じ 1 1 19BER3H35319: B4 
Е827060ЙТЕВЕ74й4:49 
e61FF125F6151DFR8: ЙА 
02010ВА565012806: 13 
RS69992 じ 18634928: 14 
96HS61FF2ZC9F78BFi71 
7885676Е280561ҒҒ:81 
2C93699978BF78RTiES 
6760288560002С0С:8Е 
679828060201082С:59 
9361FF125F6991DFi14 
R895942DB63867CBE: C2 
74RH9Z39DB79BE74:D6 
ВС5942082С058859:57 
42DB78BF8810BF30: DB 
8ВВ65052808020452:90 
18BF38522C0ERC63:02 
057СВ04902105210:08 
BF38520213348402:18 
00088502Ғ8088602:В80 
00088702Ғ8080218:51 
34937F248345DR26:R2 
2F9892394EFF4329: 22 
842F248402B7DB85:F4 
a2CanB?8BFCAO79BD:CAÀ 


937999999999999: 37 
0101Ғ1Ғ9024Ғ5424:95 
262F83F18F370880:2F 
18BF885742521058:90 
00575835 700000000: Е6 
860204DB8782F8DB: C3 
ВВ5978ВҒ80860231:94 
ПВАС5978ВҒ8й5700:ЕЕ 
5408840267088502:510 
C8DB835BD1585844:42 
DR93998414242624:E ス 
2624262426242637: 3B 
125F246700381E67:B9 
FF280237118BFDD52:5E 
24348289346158DF:27 
4060010Ғ4ЕЙЙ2Ғ0А: 14 
2Ғ0Ғ202124540209:ЕҒ 
544ЕҒҒ2Ғ0352Ғ0820:17 
2Ей0000000000000:2Е 
111164555Е5Е5963:53 
11115053514й6751:18 
5В513565В655Е4й11:5В 
58591411585Ғ6711:05 
51525Ғ6564115069:42 
115Е55671160625Ғ:50 


IE. VO "85435 2. ЯЗ 


3) Бо - 8, 柴田 憲 作 : “音階 発生 
Jedes Л аду те ОВЕ ДЧ 
4)S.BEACH: “PC-1251 の キー 同時 入力 
に つい て "。 РіО, 85 年 2 月 号 


mem リス ト 1 TENNIS BASIC U Z F mes 


1 MIIITITIIILILLLLLLL 
2:7жж TENNIS жж 
3: kk (С). WAKÄ-KUN. жж 
4i"x»* 19857/06701 жж 
5:°жж M:&BDAB-&CAHDC жж 
5: MIIIITIIIIILLLPLILLILLi 
D 

10:"à" CALL &BD00 


576251501511605С:47 
5551635511675159:80 
6411565F62115D69:63 
115E556864141480: B8 
7879494Ғ6ҒӨЙТЕТЕ:Е9 
ィ Fg97F9894 了 FTFTFi 87 
08047Ғ7Ғ4149497Ғ:5С 
TF83037F83030000: AA 
3E7F417F3E99427FiTC 
7Ғ404265714Ғ4641:АВ 
494Ғ78511814Т7ЕТҒ:60 
1827474570393CT7E: 33 
4949300371790703: B9 
367F497F36964949: 4B 
3F 1 E999999999999: 5D 
2020452515144525: 9D 
1514352515140525: A6 
15140015ҒҒ008000:50 
0020392054202825:1С 
2225284500022845:27 
16 じ 92HR999923449: 16 
393B454952199999: 5B 
52B80020FF0000800:21 


153 


Q 
PC- 1500+CE-15 フ 


BASIC 


0 ps ` 


— s 


これ は , PiO'85 年 4 月 号 の “MZ の 一 次 
元 ビ リヤ ー ド ” の 移植 版 で す 。 し か し , 2 
の まま の 移植 で は 面白 く な い の で , 少し 変 
だ で の まし た 。 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


ます の で , 適当 な 所 で | SPACE | キー を 押 
す と 振 玉 が 動き 出し ます 。 CUT, ЖЕУ 
白玉 を ポケ ッ ト に 入れ れ ば 得点 が 入り ます . 
キュ ー で 突 け る の は 5 回 まで で す 。 そし 
て 5 回 で 入ら な か っ た り ,。 НЕ: 7: 
ら な か っ だ り , ЖУО BEC ОТСО 
г Д а М. кен А ое vVàHd 
о PEI C L 5%, も う 片 方 が ポケッ いこ 9. 
ト に 入れ ば ゲー ム ・ オ ー バ ー に は な り ま せ これ は , 85-4 月 号 の 30 ペ ー ジ に ポケ コ 


MZ の も の を 少し 変更 し , 付け 加え た だ 
け な の で , PiO'85 年 4 月 号 の 29 一 30 ペ ー 
ジ を 参照 し て くだ さい . その 他 は 各自 で 解 
析 し て くだ さい. 


A. な お 。 ポ ケット に 玉 が 入る と 。 また だ 5 ン に 移植 し て みて は と あっ だ の で , きっ を 


に は も う 一 工夫 ほし いで すね . 


ESCOT: COA ASAD MZZO а 実際 に は 。 こ の プロ グラ ム は 3 月 半ば に 
グラ ム と 根本 的 に 違う 所 は , MZ の 方 は 玉 は で き て い だ の で す が 。 な ん と も ボツ に な 
が 衝突 し だ た とき 。 当 だ っ て きだ 方 の 玉 は 止 り そう て 。 信 ま で 出る きず まい に な っ て し 


まり , 止ま っ て いた 方 の 玉 が 動き 出し まし E 8 р лд 

た が , それ を や め て 両方 と も 跳ね 返る よう ロ 参 考 文献 

КЕ きん じゅ うい ち : "MZ の 一 次 元 ど リヤ ー 
プロ グラ ム は オー ル BASIC で す . 特に 実は 物理 的 に は 間違っ て いる の で す が , К”, PiO, '85# 4 月 号 


注意 する 点 は あり ませ ん が ,。 リス ト を よく 


Pac e ERN T M 
LU cod x2 САЗЫТ (АКЕ; RIE m 5 デー で に 6 


この ゲー ム は MZ の も の と ほとん ど 変 わ 
り ま せん が 。 少し 述べ て お きま す . 
ラマ ワー а н AL rnt 


ョ 一 次 元 ビ リヤ ー ド BASIC) スト — — 


18: "A"RANDONM : 89:IF INKEY$ =" " 158: IF H2=1LET U-X X2+1LET НІ=0,Н GPRINT G$:GOTO 


WAIT 9:BEEP 1: 
PAUSE " XXX イチ 
jq pepe 

xxx" 


: S=Ø: RESTORE 50 


8:FOR I-1TO 18 
: RERD @$〈1): 
NEXT I 


: GPRINT I$; :FOR 


І-6Т0 34:1F I^ 
19=INT «1/10; 
GPRINT H$;: 
NEXT I 


:GPRINT 6$;: 


NEXT I:GPRINT 
I$: GOSUB 300 


:Х1-28, х2-22: 


GCURSOR 4*X1: 
GPRINT A$: 
GCURSOR 4XX2: 
GPRINT D$:C-5: 
GOSUB 310 


BEEP 1, 38, 40: 
WAIT 0: 60Т0 18 


9 
:МЕХТ P: GOTO 20 
: P=P+RND 8+5, F= 


0, H1 =1 H2-0, a1 
=P:FOR H=0TO P 
: Q-P-M-RND 3: 
IF Hl=QAND H2- 
ØGOTO 248 


: IF H1=1ñND Х1= 


X2*1LET H1=2,H 
2-1,Ғ-1, 2=RND 
Q+RND 3, Al=Q-A 
2: ВЕЕР 1, 80, 40 


:IF Hl=2AND X1= 


29LET H1=1, Al= 
RND 1+1: BEEP 
1, 90, 40 


: IF H2-20ND X2- 


X1-1LET H2=1,H 


2, 272-1: GOSUB 4 
00:GOSUB 460 


168: IF H2-2LET UzX 


2, 221: GOSUB 40 
0: GOSUB 460 


178: IF Ніг (ЕТ U-zX 


1, 22-1: GOSUB .4 
00:GOSUB 450 


1880: IF Ні-21ЕТ U-X 


1, 2-1:GOSUB 40 
0: GOSUB 450 


139: り =X1: GOSUB 418 


:IF HIIF «Ніг1 
AND X1=X2+ 1 )OR 
R1= り IF W-2GOTO 
320 


200:U-X2:GOSUB 410 


: IF H2IF 〈(H2=2 
AND X2-X1-120R 
R2=9IF W-2GOTO 
340 


ВЕЕР YS IF. Cs 
GOTO 360 


122, R1=RND Q+ 
RND 3, A2=Q-A1: =@ 320: 
BEEP 1, 80, 40 


210: IF 1 く <= り LET HI 
220: IF 2 く <=gLET H2 


:FOR Р-1Т0 20: 


ВЕЕР 1,1,1: 
CURSOR 21:MRIT 


: IF H2=1aND X2- 


ПЕТ Н2-2, А2- 
RND R2+1: BEEP 


= り 


238:01-281-1, А2-А2- 


1: NEXT М 


2=1,F=1:BEEP 1 
‚ 80, 40 


2580: IF Е-0ОЕ Х1=29 


OR X2-1GOTO 36 
д 


260: 0=Хх1: 6050В 418 


: X=W, U=X2: 
GOSUB 410 


270: IF х-260Т0 320 
280: IF W-2GOTO 340 
298:C-2C-1:GOSUB 31 


g:GOTO 68 


300: BEEP 1: CURSOR 


21:PAUSE "S-"j 
STR$ S;" ": 
RE TURN 


318: BEEP- 1: CURSOR 


ZIUVPRINE "IR": 
GCURSOR 136: 
PRINT- C;: 
GPRINT J$: 
PAUSE :RETURN 
GCURSOR 4XX1: 
GPRINT C$:BEEP 
3, 50:5-5-20хС 


330: 6050В 300: BEEP 


1, 80: GCURSOR 4 


50 


: GCURSOR 4*X2: 


GPRINT F$: BEEP 
3, 30:5-5-10жхС 


:GOSUB 399: BEEP 


1, 88: GCURSOR 4 
XX2: GPRINT H$: 
GCURSOR 4XX1: 
GPRINT G$:GOTO 
58 


BEEP 1,255: E55 


:MRIT 188: 
PRINT "GAME OU 
ЕК : SCORE" ;S: 
WAIT е 


:PRINT "Replay 


CYOrN う 2 ?2z ": IF 
INKEY$ ="N"ENH 


: IF INKEY$ ="Ү" 


GOTO 28 


:GOTO 320 
: GOSUB 418: X-M, 


U-U-*2:GOSUB 41 
g 


:IF UzSOR U=15 


OR U-2SLET W=2 
: RETURN 


:W=1: RETURN 
:X1-2U: GCURSOR 4 


19:PRINT "РЫ-" 
;SIRS Pi" " 


XX1:GPRINT H$: 


1, 90, 40 
GCURSOR 4XX2: 


240: IF H1=1AND X1= 


や あや あや あ , みん な 元気 だ っ た か い ? 一 万 光 年 の 彼方 か ら 来 る わけ な い だ ろ . 日 本 の ぬ ね ば た ま TAKU で す . いや ー7 月 号 の スク エア に は , 
お 兄 る ん 思わ ず ど ぎ も を ぬい て し まっ だ よ . は っ は っ は っ だ けど ね , 次 回 作 は まだ 考え て いな いん だ . も と も と 元 の ある も の (さる あ 早 口 言 
葉 だ /) 少 し 変え た も の だ か ら ね . CRAZY RAT 君 , 是非 この よう な 意見 を これ か ら も どん どん 出し て くれ だ た まえ, 期待 し て る ぜ / と ころ で 
Ce 最近 イラ スト 4 人 組 の 影 が うす いよ うな 気 が す る の だ よ 、 どっ どう し た の だ . も っ と き ば っ て くれ / 以上 ( ぬ ば た ま TAKU) 


XX1:GPRINT 8%( 
WN): GCURSOR 4% 


X1-2):GPRINT Ө 
$(X+6): RETURN 


ゴキ フリ アド 


із, ふと 時 計 を 見 た だ. 時 刻 は PM6: 
00, 夕飯 時 だ . 俺 は 台所 へ 行っ た . 食器 を 
1 つ 持 ち 上 ば げ る と, 黒い 物体 が 飛び 出 し た だ. 
その 黒い 物体 し は , >, な ん と , EDK 
ぃ いな 「 デ キ プ ブリ 」 だ っ だ 。 ffiiub2, 
3 歩 の け ぞ っ だ . ゴキ ブリ は , S > Š txs 
げ て いっ だ ただ. 俺 は 勇気 を 出し て ゴキ プリ 退 
治 を 決心 し た . 武器 は 殺虫 剤 と 自分 の 体力 
77973, {ЫЛЕ Ж Z. Ui, 相手 
は だ か だ か ゴキ プリ が ダ 。 し か も 。。 そ を の ご ゴ 
キ デ ブリ は 強化 訓練 を 受け て いて , 人 間 の 子 
表 1 種 類 


特長 , 強 さ etc 


460: X2=U: GCURSOR 4 
XX2:GPRINT @$‹ 
W+3): GCURSOR 4 

X(X2-22: GPRINT 


Q$ (X+6) : RETURN 
599: DATA "6C2E2E6C 
SOBLAIEIEBCU, " 
30282830", "6C2 


518: 


(gp 


供 で らい は 30 秒 も あれ ば 充分 倒せ る くら い 


の 強 る を 持っ て い だ . 


ゲー ム の 進行 記法 


2 94d, ТЕМУ ЕЕЕ ЕРЕ 
タイ ム の ゲー ム で す . ゲー ム 自 体 は 簡単 で 
+. 要する に 家 の 中 を 歩き 回 つて いる と き 
(アド ベン チャ ー) の 画面 が 画面 С. 

コマ ンド 入力 は カナ で 行ない , 動詞 十 名 
詞 の 形式 で 行ない ます . た だ たとえ ば, 鉛筆 を 
持ち た いな ら ば モツ エン ピッ [CR | の 様 
EANGE 

T47) C3MDBUT lIR, その ゴキ プ 

表 2 回 数 


と に か く 強 い , 動き な ども 速く , 100 
回 や っ て 1 回 勝て れ ば いい 方 で す . 


DATA 


. Ae シュ ルイ 
王 と 同じ くら い の 強 さ を 持 つ . ゴキ プリ 


動き は あま り 速 く な い が , と きど き ワ 


ー プ する . カイ スウ 


15 カ イ 
動き も お そく て あま り 強 く な い . 


バイ キン の 速度 は 速い が , 自分 自身 は 
そん な に 速く な い . 


も の すご く 和 弱い . 


コメ ント 


YIL 

DES 

トウ メイ ナ 

ハコ ガ 
アル 

7)! 


HIT ANY KEY 
TO BATTLE 


一 次 元 ビ リヤ ー ド BASIC リ スト 


2F2F2F2F", "802 
F415D555D412F " 


2420€", PECIAI 
OC", "30484830" 


DATA "60606060 
", DB90909000",; " 


"7775 


@ 絵 夢 絶 半 


リ の DATA が 表示 る され ます (画面 2). Ж 
類 と の 対応 表 を 表 1 に 書い て お きま す . 

戦闘 中 の 画面 が 画面 3 で す . 画面 中 央 の 
照準 に ゴキ ブリ を 入れ て , 殺虫 剤 を 発射 し 
ic. 殺 是 剤 を 当て る 回 数 ほし ゴキ ブリ の 種 
類 と の 対応 表 が 表 2 で す . ゴキ ブリ も 自分 
(プレ イヤ ー) めがけ て バイ キン を 発射 し て 
KETTOT уақ 416-272 

ゴキ ブリ を 全部 や っ つけ る と HAPPY 
ENDT, ゴキ グリ の 発射 し た バイ キン に 
当 だ る と 。 2 ¿GAME OVER で す . 


図 2 ゲー ム 画 面 


ノ オウ 


ノコ リ 16 ビ キ 


残り の ゴキ ブリ の 数 


ра 


シュ ルイ 
ゴキ ブリ 
オウ 


B 
2 
th 
É 
" 
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РС-Т261 


BASIC 


Ша 


ノ パ ノノ パ ノ マ ツノ カノ ノッ ツノ マカ ノノ パ ノ パ ノノ ペーー 
(出走 前 の あの 曲 で す よ / 誰 で すか 棒読み 
し て る の は /). 

さあ 今日 は 日 曜日 , “PC 競馬 場 ” は 満員 
+. 君 は 今月 の お こづかい 10,000 円 を 片 
手 に いさ ん で や っ て きま し た .。 ほら / 第 1 
レー ス が 始ま っ て し まい ます よ . 早く 券 を 


Je 2 Çe S EL 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


まで 作っ た の だ か ら 。 
単勝 だ け で な く 複 勝 も で きる と よ か 
っ た の で す が ね . 


Pos が か て ここ 


PC-1261 の 方 は この ま ToC CEN 
PC-1260 の 方 は 私 が 60 を 持っ て いな い の で 
эолды も し メー モリ が だ た りな くだ 
っ だ ら 6 ら 以 下 の 行 の 順に 消し て みて くだ る さい. 
また, PiO6 月 号 の p.169 も 参考 に し て な 
ん と が 入力 し て みて くだ さい 。 ФТЬ ЕК 
目 な 6 残念 で びす が 諦 め て くだ さき さい. 申し わ 
け あ り ま せん . 

Ө12011, 43011, 5017, У リス ト 中 の CHR 
$(&F4) と その 前 の セミ コロ ン 全 部 ,380 行 


0x9» X. SINE 


eris (reum 


ш-н, шенін шн 
この ゲー ム は 表題 に も ある よう に 単勝 競 
馬 で す . 初回 は RUN, 次 回 か ら は [DEF | 
[AI で ゲー ム ・ ス ター ト で す . "HIL- モ ウケ " 
を を クリア し だ か っ だ ら 6, RUN か ら 始 め て 
くだ きい . まず タイ トル と 今度 何 レ ー ス か 
が 表示 され ます . そし て | ENTER | を 押す 
L “H- モ ウケ " と それ を 出し た 人 の 名 前 , 
その あと 各 馬 の 紹介 が あっ て , BEEP 音 後 
に 倍率 が 表示 きれ ます . 
倍率 は 2 倍 , 3 倍 , 4 倍 , 5 倍 の 4 種類 
が あっ て , 一 応 プ ログ ラム 上 で は 低 倍率 馬 
の 勝つ 確率 が 高く は な っ て いま す が , 必ず 
(52686, 3 倍 馬 が 勝つ と た は か ぎり ませ 


WRO 
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いか の と き は 過ぎ だ 


頼ま れ も し な い の に 続き を 書き ます .「 と らん すみ っ だ た あ 」 で す …. 
あん な に 重かっ た 体 な の に , 
あろ うか .. 野原 へ 出 た . 
に その 都市 に 向かっ て 歩き は じ め た だ .( つ づく ) 


眼前 に 大 き な 視 界 が ひら けた . 


始め の 馬 の 位 置 ( 上 段 ) 
馬 の ゴ ー ル の 位置 (上 段 ) 
馬 が 進む か 否 か ? 
馬 の 名 前 

馬 の 走 行 中 の 位置 

各 馬 の 倍率 

掛け 金 

持ち 金 

最終 的 な 儲け 
BEEP 音 有無 

掛け た 馬 の ワ ク 数 

ルー プ 用 

ルー プ 用 

上 段 ま た は 下段 で 馬 が 重なっ た か ? 
&203D 

勝っ た 馬 の ワ ク 数 

レー ス 数 

HI- モ ウケ の 保持 者 名 
HI- モ ウケ 


A. ここ で よく 考え て | ENTER | を 押し て 
くだ る さい 。 

その 次 は 掛け る 馬 の ワ ク と ょ と 掛け金 の 入力 
tT. この 順 で テン ・ キ ー を 使 ら て 区 力 し て 
《〈 く だ さい . こ こ で あり も し な い ワ ク 数 や 持ち 
金 以 上 の 金 を 入力 し た りす る と , 先程 の 倍率 


の 所 まで 戻 る よさ うに な っ で いま すず 、 正しい 
数 値 を 入力 も し で で だ きい 3156457 
| ENTER | を 空 押 し する と , その レー ス は 


デモ と な っ て 湊 の レー ス へ 進行 し ます . を 
LX wc X SE Ср; 

右 に 表示 る れる の は あな だ の 掛け だ 馬 と 
гоњо. Bi bERPDOIl, 2, 
3, Т ADORE LY XT X 
"Ue SMALL ы 9 99 
SHIFTS DE ATODEFZOT СТ. 

レー ス が 終了 する と , 勝っ た 馬 の 名 前 が 
左 に 表示 る れ ま す ( ま あ 実 の と ころ これ が 
や り だ い が だ め に 変 な 名 前 に な っ ちゃ っ た 
わけ で す が …). その 後 , 改め て 勝馬 の 表 
示 , そし て 配当 の 表示 も 同時 に 行ない ます . 

配当 は 100 円 に つき いく ら か ? と いう 本 
当 の 競馬 と 同じ 形式 で す . そし て , ま た 
| ENTER | を 押す と 持ち 金 の 表示 で す . ^ 
自分 が いく ら 持 っ て いる の か は よく 覚え て 
お いて くだ さい . 覚え て お か な いと 掛け 金 
の と き に 困り ます . ここ で | ENTER | を 押 
す と 次 の レー ス の 開始 で 。 タイ トル 表示 に 
Bio id. た だ し , この 時 点 で 持ち 金 が 0 
円 , まだ は 12 レ ー ス が 終了 (あっ 忘れ て い 
まし ね が ーー ス は 12 ビ ソー ス ま て で て です) し 


まそ に か の こと の か DE まだ 。 


体 は あま り に も 重かっ た だ . 


あま り に 広い 都市 で あっ だ た だ. 


表 2 行 番号 マッ プ 


変数 の クリ ア と 配列 変数 の 定義 
変数 代入 

タイ トル , HH モウ ケ , また それ を 
出し た 人 の 名 前 , 馬 紹 介 , 表示 
倍率 の 算出 と 表示 

掛け る 馬 の ワ ク と 掛け 金 の INPUT 
レー ス ・ ス ター ト 表 示 

レー ス 中 の 処理 

写真 判定 か 否 か ? 

レー ス 終 了 時 の 勝馬 シン ボル 表示 
勝馬 , 配当 , 持ち 金 の 表示 
オケ ラ か ? 

12 レ ー ス 終了 し た か ? 
繰り 返し , 30 行 へ 

ゲー ム ・ エ ンド の メッ セー ジ 表 示 
写真 判定 サブ ルー チン 

馬 の 走 行 表示 サ プ ブル ー チ ン 

馬 の 始 め の 位置 代入 サ プ ブルー チン 
馬 の 名 前 デー タ 
SMALL モ ー ド 通常 モー ド 変換 ルー 
チン 


た Та Ж 
ンド メッ セー ジ が 表示 る れ ま す . 

HI- モ ウケ を 出す と 名 前 の 登録 を 要求 し 
て くる の で 入力 し て で だ だ るい 2 と ーー ス で 
うち きり じゃ 面白 く な いと 思う 方 も いら っ 
し ゃ る と 思い ます が 。 な か な か や や っ て みる 
と 難し いも の で , 12 レ ー ス 終了 し て 儲け て 
いる あさ と は な か な か な いも の うま よ Uev 
て いよ くば っ て 儲け て すぐ で ぐつ 〇 〇 〇 に な っ ち 
us Б 2. 


wR W m m. px に つい いて 記し 3 +. 
ТАРТА ДУА ыты; 
7:41, 2,3, 4 ワク すご て が 同 閉 め 


と き は 写真 判定 と な り , 勝馬 が 1 頭 だ け 決 
定 さ れ ま す ( 判 定時 間 は 余分 に と っ て あり 
ます の で 充分 ワク ワク で きま す ). 

な お , それ 以外 の 同 着 ( 例 : 1 ワク と 3 
ワク ) は , 1, 3, 2, 4 ワク の 順に 優先 と 
な り 有 勝馬 が 決定 し ます (本 当 は すべ で て 写真 
判定 と し た 方 が よかっ だ の で す が , 同 着 の 
ケー ス が 何 通 り も ある の で あえ て こう し ま 
し だ . Хо, 表示 を よく 見 て いる と 優先 順 
位 の 順番 に 動い て いる の が わか り , 決勝 点 
で も わずか で は あり ます が 早く ゴー ル し て 
いま す ). つま り 5 無理 し て で も 勝馬 を 1 頭 
決定 し て いる わけ で す 。 


あの 影 は 私 を 呼ん え で いる らし い . どの くら 


を そして, その 影 に 追い て いっ た . 森 の 中 を 2 一 3 時 間 は 歩い た で 
か すん で 見 える 巨大 な 建造 物 が あっ た だ. 私 は た め ら わ ず 


(トラ ンス ミッ タ ア じゃ な い 「 と らん すみ っ た あ 」) 


PIO 


きい (実は 音 に 反応 する モン サー が 付い て 
いる ん で " す よ ググ と いう の は 冗談 で すず が). 
な お , 表 1 に 変数 表 , 表 2 に 行 番号 マッ コ 
2... "を 付け て く の で 参考 に し て くだ る きい. 
まっ て いま す . 馬 の 有 遅い の は な に ぶん pias 
Ji | J BASIC な の で … で も , 馬 が 遅 け れ ば それ 西 淳一 "リン クア セン プラ”, THE BASIC, 
< | だ け 楽 し み が 増 える わけ で , あん まり 時 が тА 
и... 速い と あっ と いう 間 に ゴ ー ル し ちゃ っ て , 


本 ブログ ラム は ほぼ 流れ 通り て 。 に E sR Eg ら な いと 思い ます . で すか ら 走 


еттита? っ て いる 間 は 一 生 懸 命 応 援 し て や っ て くだ 


1B:CLERR : Di" B364)»B$i 28997: CALL &11E0 238:FÜ0R Ізі ТО 3 STEP 2: ЕЙ 450:IF じ (1)=E(2) AND C(2 
43ж18,»С(4)»0(42»5%(Й 88: INPUT "° n74,29)22 "FH 50508 498: NEXT I: 36B:IF HzN THEN LET F=F+ |. )2C€3) AND じ (3)= じ (4) 
»*3ü: RESTORE : FÜR : CURSOR 24: INPUT " FOR I22 TO 4 STEP 2: DCNO*E THEN LET N= RND 4 
І=1 TÜ 4: READ B$CID Луту "ЗЕ: Р=Р-Е 5USUB 518: NEXT І 570:015 : CURSOR 5: 468:IF じ (1)= じ (2) THEN 

EXT 90:IF FCA THEN LET F=F+ 240:IF K=1 THEN LET Ізі: PRINT "EFF, ‘$F; LET N= RND 2 
E: 5070 78 GÜSUB 588:123: GOSUB CHR$ (%Ғ49: CALL &11 || 478: IF С(52-С(4) THEN 
188:IF HCA DR H54 THEN 了 498:I24: DUSUB 518 ЕЙ LET N= RNI 2+2 
ü 250:ІҒ K=2 THEN LET I=3: 58Й:ІР F く 1 THEN ВЕЕР 3*Z 488:FÜR Ізі TO 1000: 
528: = 上 ミロ 1104615: CURSOR 12: 5USUB 5й0:1=1: GOSUB : CURSOR 3: PRINT "オォ NEXT I: GOTO 358 
29:INPUT " SQUND?(cA^/1) PRINT ВН): CURSOR 490:1=2: DUSUB 518 121275415757: CURSOR 499i PUKE С((12»1»5»6»2»0: 
і 59: PRINT (HDS Vn トイ 268:IF K=3 FÜR 1=2 TO 3: $1: PRINT " GO HOME! FÜR J=1 TU 40: NEXT 
: PUKE Bs Hrs BS HS &TF GOSUB SAA: NEXT I I”: CALL &11EB: END J: PUKE C(I) 5535252 
: PUKE 8%%40»0»0»й»Й 21T8:IF С(1›=В DR CC25-B 39B:IF 0=12 THEN 418 s4: RETURN 
070 25 sr UR じ (3)=B+& す 4 DR CC4|| 400: G0SUB 520:0-0%1»Н-Й» ойӣ: PUKE CCIOs 173515182: 
EEP 2*2: PRINT “РС 128:PÜKE 8»85»51»54»54%5 _ »zB*&48 THEN 298 Е=й: БОТО 30 ) | 34,4: FÜR Jz1 TO 44: 
Ang) 98547930:7, 8: PHKE A*&40585551: 288:60T0 148 418:IF F-1BBBB>=HI THEN NEXT Ji POKE С(12»85 
-2%: CURSOR 21: 34,54,68 298:IF (C(1)=B AND CC2)= INPUT "YOU GOT HI- モ 9 s51s345 34563: RETURN 
PRINT "PUSH ENTER’: 138:FÜ0R Ізі TO 50: NEXT B) ÜR (С6(52-В8%%4й T YUUR МАМА” 55%(0):Н 918:POÜKE С(12»16»48»96;5 
CALL &11EB: RANDOM I AND じ (4 ぅ =B+&49) THEN І-Ғ-1й0йй 230: FÜR J=1 TO 48: 
40:CLS PRINT " НІ-ғ? 140:ҒОВ Ізі TO 4:BCIO- 4480 415:б6-Ғ-1йййй NEXT Ji POKE C«4I2588 
Ti'iHis CHAS (6Р4): ЕМІ (7T-DCIOD: IF BCI 3BB:IF じ (4)=B+&4 THEN 420: IF G4-8 THEN CLS : ,48»,52,52»64: RETURN 
CURSOR 27: PRINT " B )=1 THEN LET CI)= じ ( LET N=4: PUKE М»64 ЕКІН: テト s 520:0(12-й»С(20-8»С(3)-А 
Y "$5$C05: FOR Ізі 1 )+5 319i ITF じ (2)=B THEN LET N CURSOR 29: PRINT ABS +&4B ËL (4)=ñ+&4B: 
TÜ 388: NEXT I 145:NEXT I:K-ü =2: PUKE М»16 5: CHR$ (%Ғ4):”уууту RETURN 
ACLS : PRINT B$C12sB$ 158:FÜR Ізі TO 4:CCIOsC( 320:IF じ (3)=B+&4 THEN ?43993": CALL &11ЕЙ 938:DATAÀ "172 mnt 0^", 
(22»8%(5)»В8%(49: FÜR 1)-5: NEXT I LET N23: POKE М:52 4380: IF G»8 THEN CLS : т 2905022 7972295 
Ізі TO 3880: NEXT I 168:IF C(102C0C2) THEN 33B:IF じ (1)=B THEN LET N PRINT "T»5-! "$6; HIRET е 
68:F0R Ізі TO 4:0(1)= (ЕТ К-і =1: POKE М8 CHR$ (6Р4): 8972231" || 548:DATA "472 DEF 52” 
КМО 4*1: NEXT I ` iT: IF 0(552-С(4) THEN $48:FÜR Ісі TÜ 500: NEXT s CURSOR 33: PRINT " 18888:"z" РОКЕ 8205091: 
TB:CLS : BEEP Z: PRINT LET K=K+2 I: PUKE Msi 3)553!": CALL &11E8 END 
° n*4U9*: CURSOR 18 18giFUR Ісі TO 4 359i BEEP Z: CLS : CURSOR 435: END 
s PRINT 91970930610 198:IF В(1)<>1 THEN POKE 5: PRINT “П%97 73В%( 44Й:ЕПР T=! ТП ZAA: NEXT 
"3499€ ВСУ" LIS, Hr ЙаЙ»Й»Й Nd: CURSOR 31: PRINT T3 CLS 1 РЕТМТ 07.79 
TS:CURSOR 34: PRINT "32 || 288:NEXT I "MR "SDOND*188: 9"43 リャ ジリ フロ フエ テイ キュ ウツ 
| 2C"5DC3s"5422ç"5D(4 220:IF КУЙ THEN 248 CHR$ (&F4): CALL &11 


cc NS * e MIMA 


あな た は , ポケ コン で ゲー ム を し て "Е | か っ た で す よ ー. 他 に PC KEYBOARD カセ ッ ト アダ プ タ 回 路 図 
aca" к, 周辺 の 人 に 迷惑 を か け て いま | な ん か も 良かっ だ で す . 
ЖАУ. ЕТӘ; 周り が うる きく 〈《 く ゲー ム ・: エエ ッ ト , 外部 電源 は あっ た 方 が 良い と 
サウ ンド が 聞け な く て 困っ た こと は あり ま | 思い ます . 
せん か . で も この ヘッ ド ホ ン ・ ア ダ プ タ 1!? 
(自分 の 好み で デザ イン し て くだ さい ) が あ 最後 に 
れ ば , 本 体 の 音 は 消え , ヘッ ド ホ ン か ら は 
ダイ ナミ ッ ク ・ サ ウン ド が 聞け る で し ょ う . 
PC-1245 で , CALL&1EZF を 実行 し て く 
だ さい . を 省く ゲン タッ チマ ンド が 
Z = G すべ て キャ ン セ モル され ます . 戻す と き は 一 
度 電 源 を OFF に し て くだ きい. ミス 
この アダ プ タ で , 1 月 号 の DANGER- | 私 の 友人 は , FX-780P の ユー ザー で す . | E 2j 
OUS ZONE を や っ て みて くだ きい . すご | 彼 は PB-100 の プロ グラ ム を 外部 端子 の み 
| で ロー ド で きた そう で す . 


の の へ の の お の いい 一 


[ч] [>] le] jg 
rre 


مه م 
о‏ - 
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PC-1350 


BASIC 


怪人 三 十 面相 より ……『 ポ ケ コ ン を 盗ん 
だ . 返し て ほし けれ ば , 指示 の 場所 へ 現金 
三 十 円 と PiO を 持っ て こい 』 

ある 日 , 上 の よう な 手紙 が あな た の 所 へ 
届い た . 早速 , 三 十 円 と PiO を 持っ て あな 
た の 愛車 "JUMPING CAR" に 乗っ て 出 
か けた の で す が , そこ に 行く と また 次 の 指 
示 が … っ て な わけ ./ 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


キー 反応 は BASIC と 思え な い ほ ど 
良く で き て いま すね . (Ko) 


У 


プロ グラ ム の 長所 


99 9 E E CC ӘӘ 
ӨЛЕеЕ-Ксаетойі(5 550 
早く で てき: ます 。 ЖҰҮНТ (7755). 

@ キ ー の 反応 を 良く する よう に し まし だ た . 
@ 文 字 の 出力 を 工夫 し まし だ (スク ロー ル 
を 使っ た り , シー ン 表 示 な ど ). 

⑨ メ モリ の 節約 (9 に だ いぶ メス メモリ が と ら 
nocL А 

音 ク (CALL 使 用 ). 

—— O 


プロ グラ ム に つい て 


COO SS SS SS 
行 番 号 マ ッ プ を 見 れ ば わか る と 思い ます . 
ォ ー ル BASIC で す が 。 CALL に は 注意 し て 
入 才 し て で だ さい NEDRUNERUU 
eU. 
この ゲー ム は , 友人 の な お や 君 が PB- 
700 用 に 作っ た も の を 移植 し た も の で す . 
表 1 行 番号 マッ プ 


初期 設定 
画面 表示 
メイ ン 

ЯН, 説明 


qwe 

全面 クリ ア 処 理 

ACC, ゲー な ・ 才 ーー パー 

面 クリ ア 

面 デ ー タ (1100 一 1 面 , 1200 一 2 面 …) 


EFrO@, @ に 気 を 付け て 作り まし た . 
O -— ФФ ФФ ———9 —————- 


遊び 万 


ооо ФФ ОО ООО - —-- 


最初 は ハイ ・ ス コア を CLEAR| ENTER | 
で クリ ア し て [| pgF ||AI で スタ ー ト , 2 回 
目 か ら は | DEF |A P o c3. 

あな た だ は, 左上 すみ で パカ パカ し て いる 
キャ ラク タダ で す ( も う 1 つ の パカ パカ が デ ゴ 
ー ル で す ). な に か キー を 押す と , 下 に 1 
ドッ ト ず っ つ 動き 始め ます . 

[8][2][4][6] で 動い て , ゴー ル ま で 行っ 
TOI NY, 

し か し , これ で は 制限 時 間 に 問 に 合い ま 
せん の で , [Al を 押し ます . する と 1 ドッ 
ト お き に 進み 出し ます (これ は ジャ ンプ の 
つも り ). この 場合 , ドッ ト が 障害 物 に 当 


- だ ら な けれ ば 通り 越す こと が で きま す . ま 


ここ ーー ル も も ちょ うと でない た いけ は ませ ん 。 
そし て ジャ ンプ を や め だ い と き は 。 も う 一 
度 |A| を 押し ます . 

点数 は , 面 ク リア し だ た とき に (残り タイ 
ム ) ズ X100 十 (進ん だ 距離 ) メ 5, 死ん だ と き 
は (進ん だ 距離 ) < 5 の 点数 が 加算 され , б 
画 ク リア デ し だ と きせ は 1,.000 点 の ポー ナス で 


3. 
dm --— -- -————— 9 -— ———-- 


気 を 付け だ 所 


— C L OUO COO OOK 
е рЫ шыл Ж Б-Т ii EER де. 
の 入力 が な い 場 合 は . キー の 判定 を せ ず に 
戻る よう に し て ,。 スピ ー ド を 上 げ て いま す 。. 
プロ グラ ム を 見 れ ば わか る と 思い ます . 
ЖС, キー の 反応 の 良き る です . これ は 
PSET し て , 自分 を 表示 し た 後に いろ いろ 
な 処理 を し ます . そし て INKEY$ を し て 戻 
り ま す . これ を PSET し だ た すぐ 後に INKEY 
$ を 持っ て くる と ,。 "EL, ここ で 曲がる ぞ 


表 2 変数 表 


ライ ン 処 理 

ビー プ ( 0 一 オフ , 1 一 オン ) 
ゴー ル X 座 標 
ゴー ル Y 座 標 

最終 面 

次 の ポイ ント ・ デ ー タ 
スピ ビード 

ハイ ・ ス コア 
ルー プ , その 他 
スペ ー ス (5 個 ) 

キー 入力 
メッ セー ジ の 長 さ 


スペ ー ス ( 4 個 ) 


Ж” と 思っ て キー を 押し て も ,“ あ れ っ / ノ 1 
つよ けい に 進ん で 曲がっ だ ぞ み "と いう こ 
と だ な ゆま うす. 

そし て , 面 デ ゲー タ を 多く する だ め の メ モ 
V 節約 で す . 1000 や 20000 等 の よう な 0 が 
3 つ 以 上 続く よう な 数 字 は , 1E3 や 2E4 等 
を 使う と メモ リ が 節約 で きま す . GOTO 文 
等 の 行 番号 の と きも 使え ます . 

ま ただ, 変数 は どき る だ け 1 文 字 の も の を 
知っ た 方 が 良い で すこ の ゲー ふ や で も, 
М0%, M1$ し か 2 文字 変数 は 使っ て いま せ 
ん . 

№, この ゲー ム で は 使っ て いま せん が , 
行 の 最後 の “は 省け ます . で す が , 本 に 
投稿 し だ 場合 、 い くつ スペ ー ス が 入る か わ 
か ら な い の で や め た 方 が いい で し ょ う 。 


eo Ge 
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わーい , うれ し いよ ー. BiOPiO に 初め て 載っ た な ぁ と 見 て いた ら 。, 


な ん た アフ シー ト の ペー ジ に ハガキ が っ / ラ うつ うっ, あり が と う ご ざ 
いま すぅ. あん な ボー ル ペ ン で 描い た 絵 が 載る な ん て …. 感無量 . と ころ で , S1 シ リー ズ 第 2 弾 、 今度 は テン ・ キ ー 部 の [Q| |.) を 同時 に 
押し て み ま し ょ う . 変換 キー と 同じ に な り ま す . で も |@| や [[| と 一 緒 に 押す と カー ソル が 変 に な っ て し まう の きっ / 


(うれ し 恥ず か し 南湖 村 青 年 団 ) 


pio 


uc. БЕКЕР СТ それ は 
f C, BEEP1 の 所 は ВЕЕР B, 
BEEP2 の 所 は BEEP B* ネ 2 な ど と し て , 
変数 (この 場合 BO) に 0 が 入っ て いれ ば 
ВЕЕРЯ 7, 1 が 入っ て いれ ば BEEP ォ ン 
ғ. 

他 に グラ フィ ッ ク の XOR は 便利 な の で て, 


だ た くる ん 使っ て いま す 。 
— I E E E DC E E EK KC KC E 


⑯⑱ ス ピー ド ・ ア デップ は , 250 行 を 
250: PSET(X, Y) 
だ け に する . タイ ム を 表示 , 
は な く な る が 速く な る . 

その 他 は 11 行 や 80 行 を 変数 表 に 従 が っ て 
«Ito а: 

⑯ 面 デー タ の 変更 も 別表 を 見 て くだ さい . 


ゴー ル 点 減 


а адаа C CC 


と ころ で , PB-700 用 の 制作 者 な お や 君 は , 
PB-700 と PC-1350 と を 交換 し て , 今 ボ タコ 
о doe etr. 

スタ ー ト の と き 説 明 が いら な い 人 は , 
| -| の キー を 押し た 後 , [DEF [Al で スタ ー 
F q БФ E Ки КСГ COLS 
[DEF||A| し た すぐ 後 , 数 字 キ ー を 押し て い 
る と その 面 か ら ス ター ト し ます . 


変更 点 


d 9 Ф ФФ ФФ ФОО -———— —-- 


10:78” AREAD K$:2$z" 
":J$22$4" " 

11:В=1:М=1:Е=7:М№= 

15:4=0:5=0: IF К$<>°," 
GOSUB 600 

17:CLS : ВЕЕР Вж2: 
%5>”.” БОТО 20 

18:1= VAL INKEY$ : IF I 
58 LET M=I 

20:IF M>E THEN 800 

21:M8$- СНР% 91% CHR$ 9 
1%" Scene  ":M1$- 
STR$ M+" "+ CHR$ 93+ 
CHR$ 93: WAIT 8:L- 
LEN “(MB$+M1$) 2 

Zes PF も た て と INT 上 LET И 
=M1$+° ":LsL*.5 

23:FÜR I=B TO L: 
CURSOR 36-1: PRINT 
LEFT$ (M8$4M1$: ID: 
RIGHT$ (M8$4M1$:I»: 
NEXT I 

24:8-8: RESTORE 1Е5%Мж1 
AQ: READ С, эй: 
PAUSE : PAUSE J$; "SA 
FE TIME : "』 STR$ H: 
PAUSE : CLS 

25:CURSOR 13: PRINT 
az" Lode” 
S8: CURSUR 36: PRINT "SC 
ORE:"* STR$ S 
40: CURSOR 60: PRINT 
FE :"3 STR$ М 
45: CURSOR 84: PRINT 
епе:“: STR$ M 
46:IF М0 FOR Ізі TO N: 
GCURSOR (13й0%1ж4»5й) 
: bPRINT "АЙҒЙАЙ”: 
МЕХТ І 

SB:LINE (0»йЙ)-(75»510,В 
: LINE (1»12-(74»50) 
‚В 

65:READ 0: 
88 

66:IF 0-21 READ 0:871 

TO:READ P+O PB 

TS:IF ñ=B LINE «©0,Р›-‹(0 
sR>ÍsX s BF: GOTO 65 

ТҮЗДІМЕ &OsP2-COSsROsXs& 
HHHHs ВЕ: GOTO 65 

88: X22: 122:Uz8: Vz21:671: 


IF K 


"Gr 


"Sh 


"Sc 


IF 0-8 GOTO 


ЕФ 


| 399:K$= INKEY$ : 


302:K$- 


T=9 

82:Е=0: LINE (149,й0)-(1 
49,510 

85:PSET (XsY)sX: PSET ( 
С>00»Х:К%- INKEY$ : 
IF K$z"" GOTO 85 

98:PRESET (CD): PSET < 
яз YO 


198:60T0 520 


208: XX *Ux6: YzY *V*G 

210:Ғ- POINT (Xs Y) 

250:Р5ЕТ (RsY): PRESET ( 
149:Т/Иж51): PSET (С 
Dir 

260:IF C-X AND =Y GOTO 
970 

278:T=T+1 

280:ІҒ F=1 THEN 958 

IF Кӛ-” 
" THEN 200 

381:K$- INKEY$ : 
" THEN 288 

INKEY$ : 
" THEN 288 

3803:K$- INKEY$ 
" THEN 288 

320: IF К%О>А” LET 0= 
VAL K$+1: ON 0 GOTO 
200, 200, 550» 200» 370, 
209, 590; 200410» 200 

325:IF B=1 CALL &969 

338:IF 621 LET 622: 
GOTO 200 

335:IF 622 GPRINT :6=1 

348:G0T0 200 

358:U-0:V-1: GOTO 588 

370:U--1:V-0: GOTO 500 

398:U-1:V-8: GOTO 588 

418:U-28:V--1 

599: IF B=1 CALL &960: 
GPRINT 

5180:GO0TO 288 

60A: CLS : ВЕЕР B: 
CURSOR 72: WAIT 8 

6180:PRINT ° "s CHR$ 123 
% CHR$ 1235" Crazy 

Lode "$5 CHR$ 125; 

CHR$ 125 

612:PRINT " Hish score 

27% STR$ Н 
615:ҒОР I=8 TO 1: 


IF K$z" 


IF К$=" 


: IF K$z" 


PRINT 


最後 に 


A 

620: CURSOR 72: 
ж KEY жжж 

638: PRINT 
жо» 

640: PRINT 
LY d a 
GOSUB 

660:PRINT *"*: PRINT 1%” 
жжж START жжж”: 
FOR I=B TO 1: PRINT 
"*: NEXT I: PAUSE : 
RETURN 

700: НАІТ 5 

792: CURSOR 
25328: WAIT B 

T18:CURSOR 78: PRINT 
SH (。) KEY" 

128: IF INKEY$ 4»"." 
THEN 782 

750: RETURN 

800: ВЕЕР B: CURSOR 77: 
WAIT 158: PRINT "Con 
sratulation":, BEEP B 

818: АІТ 99: PRINT "You 
cleared all scenes ! 
": ВЕЕР B: WAIT 68: 
PRINT J$:" BONUS 18 
090°: ВЕЕР B 

828: NAIT 38: PRINT 2$:2$ 
%”ТНЕ END" 

838:L-18: FOR I-8 TD 4: 
WAIT L:L-2L^5: ВЕЕР В 
: PRINT "Yi NEXT I: 
ВЕЕР B*4:T-200*N*200 
:N-8: GOTO 955 

958:MAIT 8: PRESET (CH) 

951:ҒОР 1=0 TO 22: IF B= 
1 CALL &95F 

9952:LINE (X-1»Y-15-€X*1: 
Y+1)sXsBF: NEXT I 

954:CLS : CURSOR 9: 
PAUSE "BOMB !" 

955:N-N-1:8-S*T*5: ВЕЕР 
B*2: IF N«8 CLS : 
PAUSE : CURSOR 4: 
PAUSE "< БАМЕ OVER 

)": PAUSE " HIGH S 

CORE : "3 STR$ H 

956:PAUSE J$s" SCORE : 


NEXT I: 
PRINT “жж 
«8» " 
J$; "<A> «4» 
Z$" Speed 
PRINT **: 

700 


78: PRINT 28: 


"PU 


ааа аас C C 


CRAZY ROAD BASIC リス F muu 
GOSUB 70 


"x STR$ S: IF N>=9 
PRINT "": PAUSE Z$;Z 
$s "LEFT * "3 STR$ Wt 
PAUSE : GOTO 17 

958:IF H<S LET H=S: 
PñUSE : PñUSE : 
CURSOR 26: PAUSE "Yo 
u made hish score" 

960: CURSOR 77: PRINT J$; 
J$32$ 

961:CURSOR 77: PRINT "RE 
PLAY ? (Y^ND" 


962:K$- ІМКЕҮ% : IF K$-" 


,52,28,1»,5,2.75»,29 
,69;26»75»29,й0 
1588: DATA 9345755 7:252, 
5з7з6514,19,52,8,5›, 
9:5:11»6»12»4»17»6 

17 


| 1510:ФАТА 1554529514516 


:17»19;24»21»15»29 
1195238545 34,12,31, 
14,535,24,17,19,18, 
22 


| 1528: DATA. 33,15,34,25,1 


'35,4+37з513,0 


” GOTO 960 1688: DATA 15»2»99;2»10» 
9635: BEEP B: IF K$z"N" 8 19 ぅ 312。19。12。2。 
CES : END 14:8»14»11»2.,13»27 


965:60T0 18 
9780: MAIT &Bz85*4: FOR I= 


5145245 72,25,940, 26 
4029 


8 TO 25: IF В=1 1618: DATÀà 14»10»65:310:6 

CALL &969 8511:60:22:5851355 
97T1:PSET (XY)5Xi NEXT I 8;23»21,4»22»9,24: 

: ВЕЕР В 2:25»8,28,4:29;9,3 
972:CLS : CURSOR 5: 332334 

PAUSE "NICE ! GOAL I 1628: DATà 8:1.2»17»10,2 


Нн” 
9T3:CURSOR 26: PAUSE "Sá 
FE TIME : °$ STR$ H 
915: CURSOR 55: PAUSE "TI 
ME : "5 STR$ Т 
980:ІҒ Т<-И LET S=S+T*5+ 
(Ы-Т2%100: WAIT 99: 
PRINT J$3* SCORE : " 
s STR$ 5:М=М+1: 
GOTO 17 
985:PAUSE : PAUSE : 
CURSOR 26: PAUSE Z$; 
”- TIME OUT ="; J$: 
GOTO 955 
1188: DATÀ 11555775 7:251 
1,10, 10,9»50› 20:0 
1288: АТА 12:45:85» 7:251 
239512:10:55:20525 
19518529511:22:145 
29,45,21,47,22,49› 
4,52,9 
1299: DATÀ 8 
1388: DATà 11,34,65,8,2,1 
1з6»8»7»24»14»1531 
5%:54»22»5»17»11,27 
»27»5359,15эй 
1400: DATA 75»29:55»51»5 


Pi ロフ 月 号 の こめ ん な さい | Pi 月 号 の こめ ん な さい 


GO / 


(.) e Bm L C C778 v. 


DRY BATTERY Z 


p.48 
リス ト 3 に お な いて 一 部 文字 抜け が あり ま 
(72. 1740 行 の DATA の 後に ピリ オド 


DEMON'S DUNGEON I 
タイ トル 部 の 機種 名 表記 に お いて , PC- 
1350/51 と あり ます が , 


PC-1350 の 間違い 


で あり , PC-1351 と いう 機種 は ご ざい ませ 
ん 。 お 詫び し て 町 正 い た し ます . 


9.8 

1788: DATA 1651751155251 
1:18:2151156:23:25 
:11:2512:3551656517 
:1595175651756516:1 
2316512 

1718: DATÀ 24»6»55»10,26 
,5»40»5»56»2»56,2; 
24:11»40»12,55,13, 
40:28:26; 16:30:29; 
28:14 

1728: DATA 28»14»45»14,4 
529:51»11.,57»28»5 
4:9:57»1й0»56,2»57» 
6»59:2»75»29,5»14, 
5»14»5 


1730:DATA 1855518515251 


2:35»14:7»14»7»18,5 
18520262282 
51235258958 
15:0 
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PC- 1350 


ゼロ ヨン グ ゲーム 


575-002 ガイ 


この ゲー ム は ,「 よ ろ し く メカ ドッ ク 」 
と いう TV アニ メ を 見 て , 友達 が 作っ て く : 
れ と いう の で 作り まし た 。 
圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 


ptt 


“000km 00 : 00 


フラ イン グ 表 示 


な か な か 楽し め る ゲー ム で すね . で 
も , 走っ て いる と き の 画 面 が も う 少 


いい < で を とこ か かな. (Ku) 
タイ ム 表 示 用 
する と 次 に 。 シグ ナル が 表示 きれ 下 へ と ш 
点 減 し て ゆき ます . 一 番 下 の 点 減 が 終わ っ ルー プ 用 
た ら |5| の キー で スタ ー ト し ます (この と き , x 


フラ イン グ す る も 爆発 し て ゲー と ・ オ ーー ズバ 表 2 行 番号 マッ プ 


BASIC で 作っ て あり ます . RAM カ ー ド t kl. 
は 必要 あり ませ ん . 走り 出し た ら す ぐに |1| キ ー を 押し つづ I BEST TIME 
け て くだ さき さい. そし て |2|.|3| キ ー を 順に 押 a FA 
қ し て ゆく の で す ( 図 参考 )、 ユン と し て は , чарча 
BOF 1] を 長め に , [2| は 少し 長め , [3| は 最後 シグ ナル / ス ター ト 
の ダッ シュ と いう 具合 で す . ке 
最初 の と き は RUN, 2 回 目 か ら は | © そし て 400m 走 り 終 わる と チェ ッ カ ー フ ラ 各 距離 表示 


| DEF ||A| で 始ま り ま す . BEST TIMEX ッ グ が 振ら れ て 終わ り で す . な ぉ 何 か キ ー ゴー ル ・ イ ン 
示 後 , 何 か キ ー を 押す と 車 選 びに な り ま を 押せ ば BEST TIME へ 戻り ます . マシ ン に な り ま す . た だ し , Cs0 以 外 で 


3. D | [|@| の キー で 車 を 選ん だ 後 , レー e 
ス 開 始 で す . グ Б bt. フラ イン グ を し た と き の 爆発 音 中 
まず 図 ① の メー ター が 動き ます . これ は e ラム の 87 R ー ` к 


1 回 し か 往復 し ませ ん の で 注意 し て くだ る 


い ( こ れ が 初速 度 し な り ま す ). そし て , 一 , 2 に 変数 表 , 行 番号 マッ プ を 載せ て 
番 右端 まで 延び た と き に |5| キ ー を 押し て e i 車 の 性 能 は 30 行 の C の 値 で 決ま 
ん える s. り ま す . C の 値 を 小さ きく する ほど スー パー 


Bl, FR1 ジ アーズ ス を 考え て で て いま まず 0C 
i, Le. 


「 ゼ ロ ヨ ン ゲ ー ム BASIC リ スト 


2a-tUm XX" (5»-12-(144»280%В 38:02 ЕМІ 14/4%.2:К- 
17:USING "HT HR” :T=0: 13:IF INKEY$ -"" GOTO 1 YAL INKEY$ : IF К<1 

CLS : WAIT 8: PRINT 9 OR K>6 GOTO 30 

"o жжжж BEST TIME жж 28:CLS : FOR 1=1 TO 5 40: А=К-1: ВЕ$=° 000000009 

жж”: CURSOR 1,1: STEP 2:ñ=I+1: PRINT aaaaaga": IF А=3 OR 


42:IF А=2 LET Ай$=”ЕСЕЕ 
SBEFSBFEEC" 

43:IF ñ=B LET ññ$="F67F 
4B7T37T34BTFF6" 

44:IF ñ=5 LET ññ$="367F 


$:pIM NH ま (Gt1 了 =1 1 は = 
12:2=13 

5:78” RANDOM : ВВ$="900 
6600542900660" 

10:4) =° пп =P" : N$C 


1)="RX- イ モッ ス 9-" 5N を (5) 

CITY 
16:8$(20-"2-0*- Z':N$(O 

БИН ЕТТЕРІН 


PRINT 715%72М N$CI- Dit STR$ I: 8-4 LET HHR$="B6FFCFE 
18: CURSOR 15,1: PRINT ° CURSOR 13%(1-12/2: DCFFFB6" 

2nd"sX: CURSOR 1:2: PRINT N$CIOs":"3 41:IF =1 LET ññ#$="66FF 

PRINT "ird"$2: LINE STR$ А: NEXT I BFD7DTBFFF66" 


CFTTTSCFTF3b6" 

50:ҒОЕ I-20: TO 8: 
GCURSOR CI*8:31): 
GPRINT RR$:"18EBIF2B 


0) С bP7H€0p132075^. 不幸 の 手紙 に お いて , 切手 を 貼っ て いな いも の は 受け 取り 拒否 権 が ある ん で す . だ か ら , 本 来 払わ な いで いい も の を 
Qi ОО 払っ て し まっ た よう で すか ら , 今後 気 を つけ て くだ さい . 僕 も 経験 し まし た . PS. bt, どの 雑誌 で も 編集 者 を 盛り 上 げ て いる . な の に 

PiO で は ほとん 編集 者 と の 交流 が な い . みん な で 編集 部 の 方 々 を ヨイ ショ し よう. ( 推 本 えむ ) 
160 22 


199iUSIND : CLS : 


С80С": CALL &94А: 
NEXT I 


80:ҒОЕ 1=0 ТО 33 STEP 3 


: DCURSOR (71531-[ 5 
5PRINT ññ$: LINE (T1 
:32-I2- C185 35- I9 R3 В 
Fi CALL %948: NEXT I 
: BEEP 3 | 
FOR I= 
і ТО 4: FÜR J=g TO 5 
: GCURSOR Js» 1ж8-1): 
GPRINT RND 255: 

NEXT Ji NEXT I: 
CURSOR 14,1: PRINT N 
$A? | 


128:LINE (48»й2-(48,140: 


CURSOR 5:2: PRINT "3 
3-b”: CURSOR 1653: 
PRINT "km 88:80": 
LINE (865)-(14618) 
«В 


130:PSET (865205: PSET ( 


86,22): PSET (104,20 


PRESET (65+E*3521): 
5070 175 


178:PRESET (70%Еж2;51-Еж 


2) 


175:IF INKEY$ ="5" GOTO 


208 


188: IF E?-1 GOTO 165 
208:E-E*6*180: GCURSOR (6 


6,72: GPRINT "428D4R 
й8ЙВЕҒЕҒЙВЙЗ4АА 0427: 
GCURSOR (663152 


2180:GPRINT "88B5292121FF 


FF212129B508": 
CURSOR (66:23): 
GPRINT "1969514141F 
1F1414858601" 


229iMRIT 65: GPRINT : 


WAIT 5:B=B: FOR I=0 

ТО 2: PSET (6r5 1%ж5+1 
y: PSET (76%1ж5%1): 

CALL 48965 


225:IF INKEY$ z"5" LET B 


=1 


245: 
388: 


5070 800 

Y223:M-0: GCURSOR (3 
6,23): GPRINT RR$jRR 
$3sRR$: LINE (6»152-< 
60:15)? R: LINE (48,1 
52-548»512: GCURSOR 
(24,23) 

GPRINT RR$:S-à 

CALL %948: WAIT 0: 
GCURSOR (24,Ү%8): 
GPRINT RR$:K$- 
INKEY$ 


:ІҒ K$="1" LET E=E+ 


INT 5+ INT (1/C*2)s5 
-5%,52: GCURSOR (24: 
Y*8): GPRINT ВВ$: 
5070 540 


:ІҒ K$z"2" LET E=E+ 


INT (SZC)+ INT 5-1:5 
254.28: GCURSOR (24; 
Y*8): GPRINT BB$: 
DOTO 340 


ЕР K$z"3" LET ЕЗЕР 


549:ІҒ M>40 GOTO 900 
400: Y=31- INT СЕ/57)*8+8 


PIO 


ゼロ ヨン ゲー ム BASIC リ スト 


221Ғ そ 231 LET /Үя34 


4180: GCURSOR (245 Y): 


GPRINT Ай$:Т=Т+ INT 
(C10-E/45) 8): B$-" dd 
9"+ STR$ T 


420: CURSOR 19.5: PRINT 


MID$ ¢ RIGHT$ <В$,4) 
'1,2): CURSOR 22,5: 

PRINT MID$ ¢ RIGHT$ 

. (B$ s 2) 152): IF T<68 
aa GOTO 310 


888: GCURSOR (24:23): 


GPRINT "489281849144 
2821": CURSOR 16:3: 
PRINT " Frsins!"*: 
CALL 48771: GOTO 940 


8580: GCURSOR (41»Мж8-89): 


GPRINT RR$s:RR$: 
LINE (48»Мж8-89)-(48 
,Мж8-97) 


851: DECURSUR (42»Мж8-1739: 


3042423C803042423C": 
RETURN 


888: GCURSÜR (33:M*8-229) 


: GPRINT RR を RR を SRR を 
: LINE (6»Мж8-529)-( 
60s Мж8-329), В 


881: GCURSOR (24,510: 


GPRINT RR$: GCURSOR 
(24,25): GPRINT RR を 


882: GCURSOR (335 M*8-313) 


: GPRINT "222222223E 
a0020002000008880808 
880800005С00005Е2й” 


883: ІНЕ (6»M*8-3135-(60 


,Мж8-315): RETURN 


900: GCURSOR (24:7): 


GPRINT Ай$: GCURSOR 
(24,15): GPRINT ВВ%: 
LINE (515)-(595 15) 


319iMRIT 9: FOR Ізі TO 5 


: CALL &946: 
GCURSOR (405145: 
GPRINT "8814281580B86 


y: PSET (104,22): 226:PRESET (67,1ж5+1): аа Ж. GPRINT "00007Е00003С 040898485Ғ48880840000 
CURSOR 13,3: PRINT ” PRESET (76s 1ж5+1): “AE eer ар 42425С005С42425С7: 00080000008" 
ggg” NEXT I: PSET (67:16) LEER pas ws RETURN 920:CALL 8248: GCURSOR < 


148:LINE (6%152-(60%159: 


GCURSOR (24:23): 
GPRINT ññ$:E=-1: 
WAIT 58: GPRINT : 
WAIT 0: BEEP 1 


145:E-E*1: IF Е<5 PSET ( 


: PSET (76516): 
BEEP 1 


dAT WAIT B: PRESET (67,1 


6): PRESET 476516) 


228:IF B-1 GOTO 880 
250:ІҒ INKEY$ =°5° GOTO 


335: 
540: 
341: 


40 

E-E-1 

IF E«8 LET E=9 
CURSOR 13:3: PRINT 
RIGHT$ ("9"+ STR$ E 
s3): IF Е<>0 LET M=M 


+2 


860: GCURSOR 41, Мж8-169) 


: bPRINT RR$sRR$: 
LINE (48»M*8-1695-(4 
8:Мж8-177) 


861: GCURSOR ‹42,М*8-153) 


: GPRINT "4462524 じ 99 


40,14): GPRINT "8888 
999999999999844B3F4B 


980207F151B151B151F": 
NEXT I: BEEP 3 


950:Т-Т/100: IF T<=M 


LET TE ка ИЕТ 


` — 
70%Еж2,51-Еж2): 309 x - 2042422C003C42423C": GOTO 940 
GOTO 155 240:T=T+121:B$="000"+ war S duis Ө „Дын, RETURN 932:IF Т<=Х LET Z=X:X=T: 
GOSUB 850 3 GOTO 940 
159:PSET (65+E*321) STR$ T: CURSOR 19:3: || 346:IF M>19 AND М<25 870: GCURSOR (41:M48-249) : : ° 
155:IF INKEY$ =”5” GOTO PRINT MID$ ( RIGHT$ : GPRINT RR$3RR$: 934: IF Т<=2 LET Z=T 
egisti 940:ІҒ INKEY$ -'" GOTO 9 
168:IF E415 GOTO 145 22,5: PRINT RIGHT$ ( GOSUB 378 8» Мж8-257) ; 
161:Е-16 В$,2): IF T<6000 Жез Noe 871:GCURSOR (42』M*8-233) || 298: 60T0 5 
< 348:IF M>39 LET Y=15: ы У 
165:Е=Е-1: IF E54 GOTO 230 GOSUB 88 : GPRINT ”й0044482С0й 


@ ば ん ちゃ ん ず の HOSHI 


V ERE TOBE 
vs 
PR BP 


APPLE STRAWBERRY 


BANANA 


WATERMELON 


161 


PC-1245 


BASIC 十 (マシ ン 語 ) 


DOUD 


東経 120" 線 …. この 線 を 中 心 に 敵 軍 は 基 
地 を 配置 し , SERIOUS 星 を ひそ か に 侵略 
Б «бе бела Бе ва Бур з LUDU- HCM 
た SERIOUS 星 は , $t + X AB 2 C Z Cv 
る は ず は な か っ た . 

だ が , まとも に 戦っ た の で は 勝て る は ず 
は な い に 等 し い . そこ で 意表 を 衝 い て , 配 
置 さ れ て いる 基地 の 中 心 に ヘリ で 砲台 を 送 
ЧАЛА, 一 気 に ぶ っ 醸し て し まお うと いう 
まっ た く の 素 人 が 考え る よう な 作戦 を 実行 
су: 
H7n27724-X77»»*—a- 


BASIC 2 本 


な か な か 面白 い ゲ ー ム で すね . た だ, 
スク ロー ル が 1 ドッ ト 単 位 に で きれ 
ば も っ と 良く な る と 思い ます よ . 


両方 と も BASIC で す が ,。 リ スト 1 iz — 
シン 語 の 書き 込み が ある の で , iA 
に つなが る 恐れ が あり ます . 確実 に 入力 し 
TN SL 

240%, テー プ に モー し て くだ さき さい. 
それ か ら , NEW を 実行 し リスト 2 を 入 
JJ, モー を も て くだ きい (サス ト 1 60 
c). 


リス ト 1 を ロー ド し た 後 。 RUN し て くく 
だ さい . いろ いろ と や っ た 後 , "CHAIN" 
と 表示 され, リス ト 2 を 読み 込み ゲー ム が 


IREM LIST 1 

2:CLERR :А=4576, В=6350 
5,Г(-2848й0. 0=28460,Е= 
&С550,Н=1000, 1$%=° BY 


5:МАІТ B: PRINT 99: 2: READ Y: POKE B+Z» 
CALL ñ: WAIT 8: 
GÜSUB 98: RESTORE 98 
B: PRINT 7%: CALL А 

10:ҒОЕ 2--5 TD 42 STEP : CALL E+32: FOR 2-й 


ud US о г ДЕР а в Ф Б п ра р у ЧА OF Лад ВА 


ポー も ат; 

表示 は 砲台 の 内 側 か ら 見 た よう に な っ て 
27. 

砲台 は |1 | と |3| で 左右 に 回 転 し ます . し 
だ が っ て 画面 は 逆 に 動き ます . また 砲撃 は 
[s]c 3. [5] を 押す こと に より 画面 中 央 の 敵 
の 基地 (A, С) や 敵 ミ サイ ル ( 後 で 説明 ) を 
破壊 で きま す . だ だ し , ババ リア) を 砲撃 
する と ダメ ー ジ が 増え ます . 

О: 94 мр 5 01, 出現 し た だ た とき 
は 点 で , 時 間 と と も に 大 きく な っ て きま す 。 
この ミサ イル が 一 番 大 きく な っ だ と きま で 
に 破壊 で き な い と ダメ ー ジ が 増え ます . 

以上 の よう に し て ゲー ム を 進め て ゆく の 
で す が 。 この 砲台 は 旧式 な だ め , だ ま に オ 
ます 
ー バ パー ヒー トト を 起こ まま も き は 29 の 5 か に T 
マー ク が 出る の で , [O | を 押し て くだ さい . 
する と オー バー ヒー ト が 防げ ます が , も し 
防げ な いと き は ダメ ー ジ が 増え ます . 

これ だ け で は 物足りな い の で , 5 面 ご と 
に 敵 基 地 が 見 えな い 面 を 作り まし だ た だ ( 敵 ミ 
サイ ル は 見 える ). だ た だ し バリ ア は あり ま 
+A. あと , 砲撃 し た 物 の 点数 は X 2 と な 
り šT. 

書き 忘れ て いま し だ が 。 右 に 表示 る れ て 
いる 数 字 は エネ ルギー で , 砲台 を 回 転 き させ 
る と 1 減り 。 砲撃 する と 10 減 り 0, オー バー 
ヒー ト を 防ぐ と 3 減り ます が , 面 を クリ ア す 
る だ びに 1 一 130 増 えま す . СРЕО 
(5 ы тес E.M 
メー ジ が だき く な っ て も 握 じ で 。 ゲー ム … 
ォ ー バ ー の 後 は 何 か キ ー を 押す と 再 ス ター 
FT. 


リス ト 1 DOUBT BASIC リ スト I з 


Y: CRLL E*8: CALL й: 
NEXT Z 
20:ҒОЕ 2=0 TO 9: NEXT Z 


TO 9: NEXT Z 
39iFUR 2--14 TO 44 STEP 


2: READ Y: POKE В+2, 
Yø: CALL E*8: CALL 
A: NEXT 2 


4576 

63503 

28480 

28460 

&C530 

画面 内 容 

ダメ ー ジ 

VN xy 
ハイ ・ ス コア を 出し た 人 の 名 前 
| ミ サイ ル の 位置 
面 数 

画面 作成 用 
基地 の 数 

エネ ルギー 

ミサ イル の 早 さ 
スコ ア 


15, 10… 画 用 
| オー バー ヒー ト 用 


jam 


この プロ グラ ム で は , や ー (カー ン ソル) 
を 表示 きせ る の に ASCII ュ ユー ド を 使っ て い 
ET. 

まだ た だこ の プロ グラ ム は メモ リ い っ ぱい で , 
1 バイ ト で も 付け 足す と マシ ン 語 と 重なっ 
t LORE Б Г T. 6n 9595 
"CLEAR" と いう 表示 を る せる 500 行 は , 
ステ ー ト メン ト の CLEAR と し な いと 入り 
きり ませ ん . ちな み に AEM と や っ た 場合 
は 160 に な り ま す ( こ れ 以 下 は 禁 走 . ア ). 


始め の うち は , 画面 が よく わか ら な いと 
思い ます が 。 数 回 や れ ば フムフム と わか っ 
て 《 る と 思い ます (わが ら な いみ か なあ)、 あ 
と ミサ イル と 基地 か バリ ア が 重なっ た 場合 , 
キャ ラク タ が お か し く な り ま す が 気 に し な 
いで て だ さき い 。 1315. 仙 本 た だ だ き は る 
イル が 先 に 破壊 さき れ ま す . 


48:FÜR 2-й TO 15: CALL 
D: CALL E*8: CALL À: 
NEXT Z 
60:WAIT 99: PRINT " 
à :*: CALL А 


カシオ か ら ア セン プラ シミ ュ レ ー タ の 付い た ポケ コン が 出 ま し た ね . PC 党 で ある ボク は , あれ が 出 た と き は 思わ ず 「 や られ だ っ /」 と 思 
コン パパ イラ は いろ いろ な 雑誌 で PC 用 の が 発表 きる れ て いま す . で は フォ ー ト ラン . 
は ? と いう と 。 実は P じ に ある ん で す .。 シャ ー プ ミニ フォ ー ト ラン 採用 の PC-13005 と いう の が あっ だ の で し た 。 お わり に 「S」 と 付い て いる 
こと か ら , 他 に バリ エー ショ ン が ある と 思わ れ ま す . 


(Midnight SR) 


70:РОКЕ B*1530:64:96548 
:8: POKE В+25,8,48,9 
6:64 

80: РОКЕ B+2 107,438, 93, 
48.187: FÜR 2=0 TO 5 
: CALL E: CALL E+8: 
CALL ñ: NEXT 2 

81:PRINT " ñ 18PTS." 

82:PRINT " - "3 CHR$ 39; 
” SUPTS." 

* 83: WAIT B: PRINT " 3 


=5,021,%= 28-9 
5:МАЇТ 99: PRINT " 
DOUBT": CALL E+32: 
PRINT "HI "; STR$ H; 
“гурт: GOÜSUB 900 
18:0N U GOSUB 600,610 
20:K-K*P: ON К GOSUB 28 
0,210,220 
ASIF RND Үсі THEN TAA 
39i IF K>=3。5 ОР 0<-й 
THEN 858 
35:IF М-й THEN 5688 
48:0N YAL INKEY$ GOTO 3 
18:315:320531552330 
58:50TQ0 28 
200:POKE В+57+2,8: 
RETURN 
210:РОКЕ В+57+1,20,3,20: 
RETURN 
228:POKE В+57-1,65,42,28 


TORI 正 面 


aPTS.": CALL A: POKE 
B-53:65342:28:5452854 
2365: FÜR 2=@ TO 25: 
NEXT Z 
89:PRINT ">>>> CHAIN << 
<<”: CALL ñ: CHAIN 
98:PRINT " WAIT ñ MINU 
TES": CALL А 
188:POKE %С580»0»0»0»0»% 
34, 812 Í KIF: &82: $505 & 
DB: &DFs&DAàs&345s &Dhs& 


154528542365: 

510:0-0-1:Ғ%- RIGHT$ CF を 
s1)+F$:J=J+1: IF /›= 
8 LET J=1 

511:60Т0 18 

315:60T0 28 

520:0-0-1:Ғӛ- MID$ (Ғ%»2 
:62* LEFT$ CF 1 ): = 
1-1: IF J<=9 LET J=? 

521:60Т0 18 

3380:CALL C: POKE B*16:64 
: POKE B*28:64: POKE 
B+17? 96: POKE В+27,9 
6: POKE B*18:48: 
POKE В%26»48: POKE В 
%19:8: POKE B+258 

335:0-20-10: IF 1-4 AND K 
>=1 LET J= RND 7: 
CALL E*8: POKE В%20» 
107:48.95»48»1й7:5-5 
+90U,K=ġ; P=P+. 05: 
GOTO 18 

348:IF MID$ (Ғ3ӛз4зізт 
CHR$ 95 GOTO 18 


2F:1:2: &4B05 SDB, &DF 

118:POKE &C594,&Dñ | &354, & 
Dñ s &2F 1, &2Е,&15,&78 
:&11:&ED&$375&37 

120:ҒОВ Y=B TO 9: READ 2 
sX: POKE %С578-8Ү»5» 
2:234: &783 &C55 &80,&р 
Fs NEXT Y 

150:РОКЕ &C537:&37: POKE 

&C53F.&37: POKE %С54 

Fs&37: POKE %С57Ғ»63 


345:IF MID$ ‹Р$,4,1)=”А” 
(ЕТ S=SŠS+1BU,M=M-1: 
bUSUB 398: GOTO 1й 

3580: IF MID$ (F ま 5 すぅ 1)= 
CHR$ 39 LET 5=S+59Us 
M-M-1: GOSUB 398: 
GOTO 18 

368:IF MID$ (Ғ5з4з1о-717 
THEN 358 

398:CALL D: POKE B*20:10 
7:48:95»48,107 

595:Ғ%- LEFT$ (F ま 3)+ 
CHR$ 95% RIGHTS (Ғ» 
5): RETURN 

5S99iPRINT " CLEAR 117: 
FOR 2-0 TO 12: CALL 
D: CALL E*8: NEXT 2: 
SzS*188LU:L-L*150-0-* 
ЕМІ 130 P=P-.B35R=15 
К=0,0=1 

585:626*.2:V-V-2:W-W-1* 
4W}: IF V<9 LET У-2 
93:427: 52S5*188808 

519: IF P<=.3 ОЕ P>=1 LET 


TORI 横 (1) 


pO 


リス ト 1 DOUBT BASIC Z F I 


T: RETURN 
588:DATÀ 24,200, 335,170, 3 
1335548031280» 35,42,24 
150,24, FF: 23318058 
ぅ 35 &FF 3 

:DATÀ 127:127:365:36556 
2:62»127»65»65»62»63 
з127»64:з64»53 

DATA 12751275735 1355 
4515151275127 51 
920:DATÀ 127531275725 17355 


Р=. 35S=S+1999 

515:IF L=T LET 0=2,В=0›Т 
=T+5 

528:60SUB 999: GOTO 18 

688:PRINT ° ETIES x73 
STR$ 0: CALL ñ: 
RETURN 

610:PRINT " : 
s STR$ 0: CALL ñ: 
RETURN 

Ta8:CALL D:xX-0: POKE Bs4 
:14595514:4: FÜR 2-8 
TO W: IF INKEY$ =”@” 
LET X21 

710:МЕХТ Z: IF х=1 CALL 
й+5:5=5+500› 020-3: 
GOTO 18 

858:6-26-1:K-0: FÜR Z-8 
TO 2: CALL E: CALL А 
: NEXT 2: IF 04-8 
THEN 868 

:855:ІҒ 5>=1 THEN 18 

869:MRIT 99: PRINT " GÀ 
ME OVER": CALL E+16: 


4533731205120» 73030: 
8.85.8 

938:DATÀ 127%127:8»16,12 
Т7»йЙ»йЙ»88»56»й»й»65,1 
27»127»65 


ІЛ АК2 DOUBT BASIC! X ЕП maaa 
RETURN. 


IF S>H LET H=S: 
PRINT " HIGH SCORE": 
CALL E*48: INPUT "МА 
ME 7:1% 

878:WAIT B: PRINT " SCOR 
E ** STR$ 5: CALL &1 
pap: GOTO 2 

999: MRIT B: PRINT " SCEN 
E "$ STR$ L: CALL ñ: 
F$="": FOR 2-1 TO f: 
DN RND 4+R GOSUB 918 
910592039305 935: F$= 
F$+N$: NEXT Z 

981:IF М<-1 LET М=й: 
5070 988 

985: RETURN 

918:N$- CHR$ 95: RETURN 

9208:N$="ñ":M=M+1: RETURN 

939:N$= CHR を 59:М-М%1: 
RETURN 


935:N$-"3": RETURN 


e YUKIKO 


5s 


TOR 
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Q 
PC-1245 


BASIC 


PC-1245, 1350 を 使用 し て き て , マシ ン 
語 が 自由 に 使え る よう に な っ た 現在 , 初め 
の ころ に 作っ た プロ グラ ム が 懐 し く 感 じ ら 
れ ま す . そ こ で 私 が 1245 で 初め て 作っ た ゲ 
ー ム を 発表 し ます . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


キャ ラク タ の 動き は 良く で き て いま 
すね . で きれ ば 効果 音 も 付け て ほし 
か っ た な . (Ku) 


32073 
あり きた だ たり の ゲー ム で す . RUN し て < 
だ さい . ルー ル は 普通 の 野球 と 同じ で , А 


リー アウ ト に な る と ゲー ム ・ オ ー バ ー で す . 


左 か ら 投 手 が 球 を 投げ て くる の で , タイ 
ミン グ を と っ て 打っ て くだ さい (+| 以 外 


5: RANDOM 

18: Az&F80F: 
818:5-й: 
=й 

28:DIM Ү(69: FOR [=й TO 
6:ҮСІз-281: NEXT I 

38:PAUSE "*xBATTING GAM 
Ежж” 

4B:PRUSE ` HI-SCORE "$H 

SB: WAIT B: PRINT 99: 
CALL &11ЕЙ 

93:POÜKE B-15:8*CW»82532 
:96*2*CH4 2125223 8B*CW7 
3) 

SS:PDKE B-98:8*(U23252*€ 
Tz225»48*(U»512422*(V22 
)s2* CT2B2*8*CU282*32 
ж УЙ) 

68:02 ЕМІ 3:B= RND 5 

65:РОКЕ В»7»68»62»28,11 
2: 5USUB 900 


B= 
T= 


B 
80:МЕХТ I 


T*1 


1 


128:G0T0 168 


GOTO 168 


":Т=Т+1: 
T=2 


バッ テイ ング ・ ゲー ム 


70:ҒОЕ І-й TO 7: ON R 
СӨЗІ "676727171" *3 "STST41 
7273974 IP JINKETYS < 
" bUSUB 888: GOTO 13 


188:IF 0+8<7 AND Q*R23 H+1 
PAUSE " STRIKE 1%:Т- 

118:IF Q+R>6 OR O*RÁ4 
PAUSE " BALL !":UzU* : GOTO 58 

138: IF I=7 AND Q+R<7 AND 
Q*R?3 GÜSUB 688: 

149:IF I=6 AND Q+R<7 AND || 5808:"1" POKE С%51»Ү(0%1) 
Q*«R»3 PAUSE "FOULA : RETURN 

IF T>=3 LET 


1S8:IF 156 OR MTR>6 OR Q 


スト ライ ク ・ ゾ ー ン (3 ドッ ト ) 


の キー). 当 だ る と バッ ター の 後方 で ドッ ト 
が 下 か ら 上 へ 流れ ます ( 打 カ だ と 思っ て < 
だ さい ) の で , | 二 | を 押し て くだ さい . ドッ 
ト の 位置 に 応じ た 判定 が 返っ て きま す . 
まだ , ドッ ト が 2 回 流れ る 間 に キ ー を 押 
る な いと アウ ト に な り ま す . その 他 画 面 に 
つい て は 図 を 見 て くだ さい . 


プロ グラ ム に つて 


ォ ー ル BASIC な の で スピ ー ド が 遅く 
慣れる と いく ら で も 点 が 取れ る で し ょ う 
(私 は 200 点 越し て 飽き た の で や め ま し た . 

ちな み に 40 分 か か り ま し た ). Cb, 変数 


バッ ティ ング ・ ゲ ー ム BASIC U x F mes 


RETURN 

530:%5” IF 1>4 POKE C+5I 

i sYCQ+2): RETURN 

540:POKE C+5IsY(Q+1): 
RETURN 

998:"4" IF 1>4 POKE C+5I 
Ү(0-12: RETURN 

.968:POKE C*5IsYCGO*1): 
RETURN 

9710: "5" IF 1>4 POKE C*5I 
sY(Ü+3): RETURN 

580:РОКЕ C*SIsYCQ*10: 
RETURN 

599iFUR I=B TO 2: FOR J= 
9 ТО 6: POKE В-5:Ү(6 

IF INKEY$ 5274” 
NEXT Ji NEXT 1:7-0 

6180:IF J-6 PAUSE " HOME 
RUN !":S=S+W+1:M=B8:T 
=B:U=B: RETURN 

620: IF Ј<5 PAUSE " DUT ! 


*Ré4 PAUSE " STRIKE! 


160:IF T>=3 PAUSE " QUT 
! "iT=9:U=9:V=V+1 

170:ІҒ U>=4 PAUSE " FOUR 
BALLS !”:T=0:U=0: W= 


188: IF W>=4 LET М=3:5=5+ 
1 
198:IF 3 POKE &C6F3:16 


200: РАЦЏЅЕ “жж GAME OVER 
жж” 
218:IF S>H LET H=S 
229:ИАЇТ : PRINT " SCORE 
"sS: END 


318: "2" IF І>4 POKE С451 
ҮС 0: RETURN 
520:РОКЕ C*5IsYCQ*10: 


=): 


値 を 変え る こと で いく ら で も 難しく で きる 
ос, 各自 で や っ て みて くだ きい 。 


終わ り に 


先日 PC-1350 を 買っ て 以来 , 1245 か ら 遠 
ざか っ て いま す . 57, 6 月 号 の 有 交 義 城 
る ん へ . あな だ の 期待 に 沿う 2 で く 
GPRINT ル シー チン を 作り まし だ た だ. 完成 し 
КЕ AET EA, お か しゃ: あッ 
ド が 遅い // 高速 版 を 作っ だ が, それ で も 
遅い (BASIC の わずか 数 倍 ).、 だ た ぶん これ 


以上 の 高速 化 は 無理 で し ょ う . これ も ひと 


え に V-RAM 配 置 の 複雑 る が 悪い . 高速 化 


に 自信 の ある 人 は 投稿 し て くだ きい. 
で の りす プク ゲ 


":VzVs01:Tz-0:U-0: 
RETURN 

638:PAUSE " HIT !"*":Tzà8:U 
=й:М=М+1: RETURN 

9888:POKE В»2»68»62,28311 
2: FOR Jz8 TO 4: 

i NEXT J 

818:PÜKE Bs76 62:28 53656 
8: RETURN 

9880:POKE 8:28:126:11654: 
8: FOR J-8 TO 14: 
NEXT J 

910:РОКЕ 8»й0»126»2й»18,1 
6: FOR J=g TO 7: 
NEXT J 

928: POKE 8,йЙ»64»62,20,1й 

8: RETURN 


p 編集 部 の V さ ん は , 


の 最高 責任 者 を し て いま す . 


も し か し て 天文 ファ ン な の で すか ? 実は 私 も この 道 9 年 の 天文 キチ ガイ な の で す . 高校 で は , ЯВ ЖЕЛ 5727 
部 長 よ り も 権力 が 強い の で , 後輩 達 は こう 呼ぶ の で す が , 
星 の ス ライ ド や , パッ コン (FM-7,。 PASOPIA) と , ポケ ュ ン (PC-1501, etc.) に よる 星 上 占い など を 出展 し て いま す . 特に スラ イド の 方 は , こ 
こ 3 年 間 私 が プロデュ ー ス し て いる の で す が , 去年 は , 長年 の 夢 で あっ た だ た 「3 面 マン チ ・ ス クリ ー ン 」 を 採用 し , COSMOS, 姫 神 せ ん せい し 


まあ , それ は いい と し て , 我 が 理科 部 は 毎年 文化 祭 に 


РВ-З00/1 ОО 


ССС 


M/E EB 


あな た は , ロボ ッ ト 工 場 の アル バイ ト を す R2 行 番号 マッ プ 


る こと に し まし た . し か し 部 品 を 間違え る 


を 間違え ず に , ロボ ッ ト を 作り 上 げ て くだ ロボ ッ ト の 頭 初期 設定 
さい . ロボ ッ ト の 足 キー 入力 


キー 入力 キー 入力 判定 
2107 

アル バイ ト 終了 
制限 時 間 判 定 

ミス 判定 

キャ ラク タ 表 示 

時 間 か せ ぎ . 

得点 UP, 部 品 切 り 換 え 
ゲー ム ・ オォ オーバー, 得点 


詳 プ ログ ラム ・ イ ン フ ォ メ ーション 


各 コ ン ベ ア 


| ループ 
部 品 の 番号 


本 体 の み で 動く も の と し て は , よく 
で き て いる と 思い ます . た だ し , B 
分 が 部 品 を 取っ た か どう か が は っ き 
り し な いと ころ が 難点 で すね . (Ku) 


(А 


CLEAR| EXE |DEFMO| ЕХЕ | と LT, H 面 を クリ ア す る ご と い 部 品 の 流れ が 速く な 


キー 操作 


時 間 か せき ぎ R3 キャ ラク タ , 得点 
ルー プ 
ミス の 回 数 
コン ベア の 速 さ 
得点 

制限 時 間 
コン ベア の 位置 


違い の な いよ うに 入力 し て くだ る い . 927. | 
ENS жз, この ゲー ム に は 制限 時 間 も あ る の | 
T, 時 間 を 守っ て くだ さい : 取る 部 品 ベル トコ ン ベ ア ミス の 回 数 
uy | € - 
Z ログ ラム に pr dati E ATO: аг を 押す . 
RUN で ゲー ム が 始ま り ま す . 一 番 左 に 
部 品 ( 初 め ゆ は 手 “一 ", RRIA "O", 最後 (7 つい て まだ 。 デル バイ ト ・ シ サー ズ と し で 出し て 
CAR " ァ ヶ ") が 出る の で , 中 央 の 4 つの ベル メモ リ が た くさ ん 余っ て いる の で , いろ いき た だ たい です. 関係 な いけ ど , な り 金 , < 
トコ ュ コン で ご ア か ら 出 て くる 部 品 の 中 か ら 同 じ いみ 改造 し て みて くだ さい. ЖІ ОЖЖ, ら 6 お , 載っ だ た ぞ 一 . 
も の を 取っ て 〈 く だるい. 表 2 の 行 番号 マッ プ を みれ ば , ほとん ど わ 


Heb Her o[1][2]|s]--] C. 部 品 を か る と 思い ます . 
取る と 10 点 加算 きれ ます . また , 右 の 数 字 | ZR 

は 部 品 を 間違え て 取っ た 数 で , 3 回 部 品 を 
間違え て 取る と ゲー ム ・ オ ー バ ー に な り ま 
T. 


を し て , 3 つの 部 品 を 取る と 1 面 ク リア で , ゲー ム 内 容 が 簡単 すず て し まい まし た . | 
г RO BOT BASIC „эө COMI 


c g 


ATRE2SNENT CIBO 


тг 


IF V=W;iE=K+1) Gi K Ре 10 SHE 
Pysy- gai 5 


LA, CUSCO な どの シン セ サ イ ザー・ サ ウン ド に 乗せ て , ダイ ナミ ッ ク に 上 映し まし た . 今年 も 11 月 3 日 に 文化 祭 が あり ます . 近く の 人 は 
是非 見 に 来 て くだ さい . 場所 は 大 阪 市 四天王 寺 近 く の , ある 私 立 男子 校 ど です . 待っ て ます . P.S. 乗馬 を 始め て 1 年 前 , 馬 と 仲良 く な れ た け 
E, ⑯ に な っ ちゃ っ だ よー/ 一 般 庶民 は つら いっ ググ (F. キ ッ ス は 典 馬 と し た (? ) ち ょ 2ER 3 ° 7 x — лій) 
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Q 
PB-300/100 


PB で は 初 ( ? ) の バレ ー ボ ポー ル ・ ゲ ー ム 
Tý. も ちろ ん P 昌 -100 だ け (544STEPS ) 


で も で きま す . 敵 の 強 さ も 変え られ る の で , 


な か な か 楽し め る と 思い ます よ . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


それ な り に 楽し め ま し た が , Жж 
いえ ば 相手 の と きも ボー ル が 動い た 
| 方 が よい と 思い ます . (Ku) 


特に 説明 は い ら な い сысы Ж 


数 の 拡張 は 必要 あ り ま せん . 


この ゲー ム は 6 人 制 , 1 モッ トマ ッ チ の ババ 


レー ボー ル ・ ゲ ー ム で す .。 RUN き せる と 。 
まず 敵 の 強 る を 開い て くる の で , 1 ヵ か 6 7 で 


入力 し て くだ さい (大 きい ほど 強い ). 

次 に 実行 画面 に つい て で す が ,。 まず 図 1 
の よう に 両 チ ー ム の 点数 が 表示 る れ ま す . 
左側 が 敵 で 右側 が 自分 で す . 点 の 横 に 付い 


て いる “6” は 。 そ ち 6 の チー ム に サー 


権 が ある こと を 意味 し ます . 
続い て 図 2 の よう に な り ま す . то 
“P” が ネッ ト で , それ より 左側 が 敵 , 右側 
が 自分 の コー ト で す . 自分 の コー ト に は 
"m" が 6 個 あ り ま す . これ が 6 人 の デレ イ 
を いう 之 と に な り ま す . 


PRINT "VOLLEY i 
ALL": 1G0SUB 8 
180 PRINT CSR 2 


ご ろ ま で に も ら っ た 方 が いい で す . 富士通 館 で す が , 
も 50 分 も 待て ば 見 られ ます ). ここ は 整理 券 待ち の 列 に 並ぶ の が 少し 大 変 で す が …. 


か も しれ ま せん (待ち 時 間 が 短けれ ば ). P.S.2 人 工 雨 は 濡れ ん る と いう より , 打 た れる と いっ た 感じ で な か な か ハー ド で す . 


41 画面 表示 1 


画面 表示 2 


|. る て , 内 容 と キー 操作 を 説明 し まし ょ う 
敵 の ユー ト か ら 打 だ たれ だ た だ ボール "o" が 自 
分 の コー ト に 〈 く る と 。 6 人 の レイ ヤー の 


いずれ か の 所 に 落ち ます . そこ で あな だ は , 


を の プレ イヤ ー に 対応 する |1| か 6|@| ま で 
の キー( ネ ッ ト ぎ わが 1]|, 右端 が [@|) を 素 
早く 押し て くだ きい 。 コン ピュ ー タ は 一 定 
時 間 し か 待っ て くれ な い の で (時 間 は 敵 の 
強 さ る に よっ て 違う ), その 間 に 対 応 す る キ 
ー が 押せ な いと き は MISS と な b, KOR 
イジ メト で すす よう する に 。 モダ ゲ ダラ だ だき の 
要領 で や れ ば いい の で す . 

そし て 3 回 打つ と 敵 の コート へ 飛ん で い 
š, も し 敵 が レシ ー プ すれ ば まだ ボール が 
自分 の 方 へ 飛ん で きま す が 、。 レ シー プ グ に 失 
敗 す れ ば "NICE" と 表示 きれ て 自分 の ポイ 
ント に だ が だり ます : 

知っ て いる と は 思い ます が , サー プ 権 の 
な い チ ー ム が ポイ ント し て も , サー プ 権 が 
移る だ け で 点 に は な り ま せん . また だ, 14 対 
14 に な る と ジュ ー ス で 13 対 13 に 戻り ます . 
どちら か が 15 点 と る と ゲー ム ・ オ ー バ パー で 
F, 


点 が レシ ー プ する 回 数 
ボー ル の 落下 位置 
キー 入力 用 


ルー プ 用 


コー ト の 図 


プロ グラ ム を 見 る と わか り ま す が , ルー 
プ の 中 か ら 外 に 飛び 出す と いっ た な た, 
BASIC の 基本 を 無視 し た こと を や っ て い 
ます が , W,X,Y,ZO 4 つ 以 外 の 変数 を ルー 
デ に 用 いな いこ と に よっ て 。 エタ ラー を 出 き 
な が いよ うに し 宛 (まず: 


SPRINT ' 
JIK": END 
SPRINT ' 


0=1:=11:805 


S€ co € gc‏ س 


iF | 
үй 
IF | 
00 
3 
Ë 


a maq ot 


CRENIERO4 


и 
... 


i 
li 
w 
Fej 
i 


ГОК izl 


ExT A GOTO 288 
F VRL(CRS2sG TH 


ТУІ 
IT CSR wif 


} HERT Үзінді 


伝説 阪神 さん の 科学 万 博 レ ポー ト に 補足 を 少し . 日 立 館 の 子 約 所 の 前 は 長蛇 の 列 が で きま す が 。 もらう の に 5 分 も か か りら EA, TM 
ここ だ け は だ と え 1 日 つぶ し て で も 見 まし ょ う ( も っ と も 今 は 整理 券 方 式 な の で , 長く て 
P.S. 暑い 日 は スイ ス 館 で 人 工 雨 に 濡れ る の も 面白 い … 


IO 


ー ボ ー ル - ゲ ー ム BASIC リ スト 


FOR 2-1 79 180: 


NEAT PRINT ІК 


“(4 
ГА 


HHH] 


— | その 他 の ルー ル は , 表 を 見 れ ば だ いた い | (7 月 号 の ミニ ピオ に 載っ た 羽田 さん ) が 制 
わか る と 思い ます . 作 し た を そう で す が 。 暴走 し て し まい 途中 で 

ds de Ae Sa 断念 し た そう で す . 

デオ ・ デ ッ キ の 録画 4 y チ を 押す (ビデ オォ 追伸 


君 を デッキ の 前 に 移動 させ る ) こ と が , с | 私 は , 前 作 「 ビ デ ォ 君 の 大 冒険 」 の 作者 , 


の ゲー ム の 目的 で す . 佐 柳 隆行 の 弟 で す . あの 作品 は 兄 の 友人 
ゲー/ の 説明 жой テー プ の 色 | WEAPON Kata | Pd 
移動 | We 


ビデ オォ 君 は 初め 武器 を 持っ て いま せん が | +-> NAME i Ao чш 


2 の テー プ を 取る こと に より 武器 が 使え る Lus r co HR 
よう に な り ま す ( 表 3). し か し , 時 間 が た ا‎ ак ығ 
つと 武器 は 使 を な く な り ま す ( テ ー プ は 強 
力 な 武器 の も の ほど 出現 確率 が 低い ). ТЕЛЕ ИМ, 

この ゲー ム は スク ロー ル ・ ゲ ー ム で :。 vr 
デオ ォ 君 が 画面 の 半分 より 上 に 行く と , 画面 сера к "IN - 
は スク ロー ル し ます . な お ぢ お, 左右 の 端 。 な Jn vh , 

сай 


敵 を 倒す 


8 方 向 発 射 可 
s | | ワイド 砲 | 3 方 向 に 飛ぶ 


8 方 向 発射 可 
ー 定 距離 で さく 裂 
一 度 に た (さん の 獣 を 倒す 


ビデ オォ 君 は 前 作 の よう に 匹 数 制 で は な く 


点 で 終わ り と な り ま す . 


=3 1 CL タメ に な 8 の で 


⑨O ビ デオ ・ デ ッ キ 出現 時 に は , 敵 の 総 攻撃 と 
ee ok. 

Qhi-fiZ t »*—i3, 1 エリ ア に 1 つが か 
BOT GTA E 


表 1 味方 


| 移動 


E 
pł 


ビデ オ 君 の スピ ー ド 
が 少し 速く な る 
iios 
$ 


454 


\ 


AZ] 


^| VHS の テー ブ ン 
j^ уар 


МЕ 


PROCESSOR 
= hi-fi = 


= “©: 
574 
^^ шаі) 


ТЕ а 


(2 6157 > KEK ЖД Ж) 


n. 
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PB-3007100 


BASIC 


T ANK PORTEN 
ATTACK 


ШЕКЕК & ВРС +; +< 


変数 表 R2 行 番号 マッ プ 


Bel sc dad oil deli S Š 表 1 
こ で 縦 に も 行け る タン ク ・ ゲ ー ム を 作っ 
ca С. 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


プロ クラ ム Nc 


タイ トル , 初期 設定 な ど 
メイ ン ・ ル ー チ ン 
面 ク リア 
地雷 に や られ た 

や られ た 

ゲー ム ・ オ ー バ ー 
面 コ ー ス SUB 

10 面 クリ ア SUB 

ミサ イル の SUB 

ボー ナス ・ ゲ ー ム SUB 
ルー プ SUB 


ボー ナス ・ ゲ ー ム 用 


ボー ナス ・ ゲ ー ム の ミサ イル の 素 の 
位置 


縦 に も 行け る と いう ゲー ム は 珍 ら し 
いけ ど , これ を タン ク ・ ゲ ー ム に 応 
用 し た の は 残念 な 気 が し ます . (Ku) 


| ルー プ な ど 


自分 の タン ク ・ キ ャ ラク タ 
自分 の 位置 


自分 の 残り タン ク 
敵 の タン ク の 位置 


| 血 の タ ンク の キャ ラク タ 


内 容 
| 自分 の タン ク ( 下 に ある ) 
自分 の タン ク ( 上 に ある ) 


残り 敵 の 数 , ボー ナス ・ ゲ ー ム の タイ ム 
親玉 の タン ク の 位置 

ミサ イル の 残り 数 

| い ぁ いろ な も の (乱数 な ど ) 


ミサ イル の キャ ラク タ な ど 


RUN ま た は | SHIFT |O で スタ ー ト で す . 
自分 の タン ク を | ぁ gl|2|[4|[6| で 上 下 左右 に 
動か し, [Z] で ミサ イル を 発射 し て , КО 
タタ ンク を や っ つけ て くだ さい (10 点 ). 

し か し , 親玉 の タン ク は や っ つけ られ ず , 
ミサ イル も 通る な い の で , 敵 と の 間 に い る 
場合 は ミサ イル を 発射 し ながい ほう が 良い で 
EEA 

まだ , 敵 の タン ク は 高 る を 変え れ ば よ け 
られ ます が 。 親玉 の タン ク は 必殺 の 「 擦 9 
抜け で よ け る し か あり ませ ん .「 擦 り 抜 
け 」 は 自分 の と な り に 親玉 の タン ク が きた 
と き に, 素早 〈 く 親玉 の 方 向 に キー を 押す と 


ちゃ ん と 弾 数 に 限界 が あり ます . 初め は 20 
発 持っ て いま す が , 使う ご と に 減り ます . 
し か し 面 ク リア する と 5 発 加 算 る れ ま す 。 
それ で も 使っ て いて ピン チ に な る こと が あ 
る か も し れ ま せん . その だ に, ボー ナ 
ス ・ ゲ ー ム が ある の で す . 


周り の 壁 ( ゲ ー ム に は 関係 な い ) 


上 に "STOP" が 表示 され た だ た ら , [ЕХЕ | 
い purum > " р 
< ゲー / を 押し て 先 に 進ん で くだ さい . 
な お , 改造 は 表 1 の 変数 表 を 参考 に し て 
くだ さい 。 まだ た , キャ ラク タ は 表 3 の キャ 
ラク タ 表 を 見 て くだ る さい. 


2,9 UNT D TTG Lk, WM Ж» 
ゲー ム が で "きま す 。 これ は タダ ンク か ら 了 降り 


"Chit. た 自分 を |4|[@| で 左右 に 動か し , ミサ イル わり に 
そし て , 敵 の タン ク を 面 数 分 や っ つけ れ の 素 を 取る も の で す . us 
ば 面 ク リア で す . 2 面 か ら は 地雷 が 出 て き ミサ イル の 素 は 1 つ 取 る と , また 違う 所 


iT. これ は 高き を 合わ せ て ぶつ か る と や 
られ て し まう の で , ミサ イル で 爆破 する か 
(5 点 )、 よ けら れる 場合 は よ け て くだ さい . 
101812 リア する と 10.000 点 が 加算 され て 1 
面 に 戻り ます . 


- 出 て きま す . 真ん中 に 出 て くる 数 字 ( 制 
限 時 間 ) が 0 に な る まで 取っ て くだ さい . 
トー タル の 分 だ け 弾 数 が 加算 きれ , 10 点 ※ 
取っ た だ 弾 数 の 分 だ どけ 点 が 入り ます . 


P1 の デー タ は 作り 変え て 結構 で す . f 
の ペン ネー ム は 「FKFK &BPC, と 言い 
id. FKFK は 4 人 の 略 文字 , BPC は 僕 の 
入っ て いる BASIC РВ CLUBOREC P. 


書き 忘れ まし た が , ゲー ム 中 に |5| を 押 


ミサ イル は 何 発 も 発射 し て は いけ ませ ん . す と 残り の 自分 の 弾 数 が 表示 きれ ます . di 


° "(9 


7 月 号 p.170 の クラ ッ シ ャ ーREI さ ん. PIONEER に する と 「 パ イオ ニア 」 となり, 同名 の メー カー も あり ます か ら ま ずい の で は ? (意味 は 開 

HH. 先駆 者 ) P.S. 最 近 リ ッ ク ・ ス プリ ング フィ ー ル ド ,。 フィ ル ・ コ リン ズ の お じき さん に 凝っ て いま す ( 特 に リッ ク ・ ス プリ ング フィ ー ル 

ド は 最高 ⑦) P.S.2 7 月 号 p.169 の 鏡 の 国 の リト ル さ ん の イラ スト を 一 瞬 見 て . グリ コー ゲン X だ と 思っ た の は 私 だ け で は な いで し ょ うぅ 5. 
(シン プル ・ マ イン ズ の 「 ド ント ・ ユ ー ?」 の ビデ オ を 見 て か た づけ る の 大 変 だ どろ 一 な と 感じ た めがね で ぐま) 


ҮНС 

3 PRINT "Tank Att 

ack TER=1IN=SIT 

219 

3 L$z^o'tMziatfiz] 

dott # 

i: TR: l= 

2 PRINT PRINT P: 
"remi "15i" Pis," 
"Tasa" iV." Teil 
ӨТ, "Tank" XN 

PRINT :PRINT $; 

CSR MSLSSCSR i5 


"att 


i2 ib “s0 THEN iê 


ДІКТЕН 
18 
onir F$ 
18 
itzij THEN i8 
RINT BHE T 
НІНІ.) 
s$" "IF Ld 


IF gru 1 


j IF REY 


gë 


4 IF КЕЗІНЕ 


20: 80506 #2 


; 9=0+1МТ (КЕНІН 


sa TE 
- ЇР Û nen Í 


ib IF МӨНІН 
Г IF ХАМЕС, SP 


IF FRAC (К/2)=й 
THEN 42 
НН: 


ші 
шей ° 


8070 43 


42 dzl-1t1F КІН 


16 


3 IF КЕЗ ӘҮРЕІН 


1 CSR i:"Mokori 
“¥; BHOSLE #815 


(SUB #8 


SF ТУЙ THEN i8 


44 
3 PRINT CSR 11 Hi 


ce Clear tRzR«] 
iTF FRAC (RZ3)= 

As GOSUB #5 

y= BOT 5 

PRINT CSR Hit" 
1150508 $8 


8 $="0000000,_ ": 
FOR dei TO 18:P 


RINT ESR MID 
{122160808 48: 
NEXT X 


TANK ATTACK BASIC !) Z F 
; PRINT PRINT ү 


>» Miss 444310 
9506 $8:N-H-1: 
F ЧУЙ THEN 5 


H $=" Same over: 


"=й: РОБ 3-8 Т 
Û ШІРБІНТ ESR 
A HIDHNI: i 
BUSUB #8:М=4+: 
IF ЕЛІНЕ 
NEXT X: STOP :PR 
INT "Yogr":83"p 


4 E] 
Sa 


5 INPUT "?Hext?(T 


Жі IF Efe" 
T" THEN 1 


| 8070 К+] 
2 3-91 


"SRETURN 


Е Ез NW... т 


* t RETURN 


š {=“{ 3279291 


“КЕТПЕН 


E $= (i aig 


“КЕТПЕН 


4 sat тз з 1 


"RETURN 


> 


( $9 b osi 


"RETURN 
СИР 


“RETURN 


š iz". ы Мыш, узай, ЖЕЙ шы! 


? PRINT :PRINT "^ 


3 Re1:80TO 1 


| He зан (0-8): = 


ZEE 
5 i «Hell 10 


 z'-* THEN 38 
B IF Хай THEN 1] 


| HEAT AVEW-1ERE 


9 4а” 4 WCS P) 3 TURN 
"RETURN ў PRINT L5 
$="? iibris 7 : 150506 
` RETURN 1 ЕП: 
845; Eo 
S t RETURN 21 RETURN 

| jd $-MIDCI A +" "+ 
Consratuiations BIDCE42) 12-545: 
15*:9z54108808 RETURN 


R ü 
Hs 


1 PRINT "'Bonus ü 
ae i^i fer т=з: 


Р LEDS с. То 
ЕК i ЕзІНТ (ЕЙН#*12 


i ZF pi || З PRINT інін GS 


T t TOR Enn 


Е H= RETURN 


STEP H:PRINT (5 
npe 
Зең ніні 
F $=, ИІР Z$= 
825 THEN 39 


IF Yet. iE 2 
8 PRINT :PRINT ' 


Total * X idis 
ir m "TIF P$ қыраны, 
i THEN 28 RETURN | 
ТЕ Í P$ 
өз THEN 28 


ү =i; RETURN j FOR 128 10 20N 
EXT RETURN 


z “7 
` 
гы 
der 
" 
= 
1 


Emt peet " = " 


NEZUMI PENGIN 
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PB-300/100-- OR- 1 


BASIC 


ЗОГЗ..... 
ICC ЕЗ: 


ved. 2 


豊原 広 行 


PiO'85 年 5 月 号 の 特集 を 見 て 。 PB で そ 


れ ら し き 物 を 作っ て み ま し た (と いっ て も , 


た か が 知れ て いま す が …). 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


良く で きた アイ デア だ と は 思い ます . 
た だ し , キー の 反応 に つい て は も う 
すこ し 改良 が 必要 か な ? 

(Ko) 


詰め て 入力 し な けれ ば な ら な い 行 は ひと 
ЖА ҒӘНҒА, СТО а-и 
NF て 2 ガガガ も し で くだ きい 。 


| SHIFT |[O|# ま た は RUN で タイ トル 表 


示 後 。 すぐ に ゲー ム が 始ま り ま す .。 3, 
途中 で ゲー ム を 中 断 し て も RUN6O| EXE | 
で 続き が で きま す . 


貴方 は 。 BOMBS " 〇 "を 操っ て , 
ПЕТ емлеге で つっ つけ 
た り 。 ジャ ング で か わし だ り し な が ら 出 口 
КО を 探し , 脱出 し て くだ さい . 

両端 に と きど き 出 現す る 矢印 は リフ ト な 
の で , 上 下 移動 に は これ を 使用 し ます . 当 
然 リ フト に 乗り 損ね る と ミス に な り ま す . 

UFO は 頑丈 に 作ら れ て いる の で , バク 
ダン を 中 央 に 当て な いと や っ つけ られ ませ 
A. だ と え 爆 風 に 当たっ て も 気絶 する だ け 
な の で , うま く 真 ん 中 に お びき 寄せ て 〈 く だ 
イン bal ills dr M $552, Жү? 


持っ て や っ て いる こと に 。 


fe 


面 数 X200PTS( 自 力 で 探し 当て た と 
きのみ ) 
100PTS 


※ 面 クリ ア 時 は , 残り タイ ム メ 面 数 


3t «x7 6 うん に 秦 化 し $4. また 気 
絶 中 な ら UFO に 接触 し て も 大 丈夫 で す ). 

地面 “マー” は UEO を や っ つけ る と , € 
この 部 分 に 穴 が あき ます 。 も ちろ ん この 
究 に は まっ て は いけ ませ ん . それ と , 爆風 
が リフ ト に 当 だ る と 被爆 し た リフ ト が 使用 
不能 に な り ま す . 復活 させ る こと も で きま 
す が 。 あ えて 書き ませ ん (や っ て みる と す 
ぐに わか る と 思い ます )。 

そし て 出口 は UFO を 規定 数 ( 面 数 + 4 ) 
や っ つけ る と 自動 的 に 出 ま す . まだ 規定 数 
に 満 だ な い 場 合 で も 出す こと が で きま す . 
この 出口 に 飛び 込む と 1 面 ク リア と な り 
UFO の 規定 数 が 一 つ 増 えた, TIME が も と 
に 戻っ て 次 の 面 ( と いっ て も 大 し た 変化 は 
あり ませ ん ) に な り ま す が , 地面 は 奇数 
面 に な ら な いと も と に 戻ら な い の で 注意 し 
tiv. 

TIME は ゲー ム 開 始 時 に 300 あ っ て , 7 
ー ム 中 に 1 ずつ 減っ て いき ます . も し 
TIME が 0 に な る と 即 ゲ ー ム ・ オ ー バ ー に な 
っ て し まい ます . まだ BOMB 号 の Y 座 標 


は 上 の 角度 表示 で わか り ま す (DEG : 1 階 , 


RAD: 2%, СКА : З). 

それ と , ゲー ム 中 に フル ー ツ の ツ ” が 突 
然 出現 する の で うま く 〈 く 取っ て くだ る い ( 急 
に 消 も る こと も ある ). うま く 〈《 取 っ だ と き 
сз, ぴ びっ くり マー ク が 表示 され ます . 

BOMB 号 は ゲー ム 開 始 時 に は 3 BEC T, 
奇数 面 を クリ ア す る と 1 機 ず つ 増 えて いき 
ёч ネー オデ だ つい て は 本 1 тит < 1” 
tv. 


説明 が や や こし く な っ て し まい まし た だ た が, 


や っ て みれ ば わか る と 思い ます . 


UFO の 気絶 し て いる 時 間 
UFO の 規定 数 

BOMB 号 の 残り 数 

面 数 

ルー プ 制 御 を フル ー ツ 出 現 フ ラグ 


リフ ト 移 動 フ ラグ 
スズ コア 
上 り の リフ ト の Y 座 標 


$ の 内 か ら の 取り 出し 位置 (地面 表示 ) 
タイ ム 

上 り の リフ ト の 破損 フラ グ 

下り の リフ ト の 破損 フラ グ 
フル ー ツ の X 座 標 


Жағы а Аы 


この ゲー ム に は BUG が 2 匹 (?7) い ます . 
名 前 は 隠れ み の 虫 と ワー プ 虫 で す . どう 
ぞ を 可愛 が っ て くだ さい (な ん の こっ ちゃ ). 


тізіле も RS っ て 
工夫 し た こと は , UFO や BOMB 号 の は み 
出し 処理 に , IF 文 を 使わ ず SGN 関 数 を 使 
っ て 高速 化 を 計り まし だ た (だ いし て 変わ ら 
な が っ だ り し て …:)。 

実は ワー 中 の 出身 地 は SGN 家 な の で 
+. うま くい け ば ワー ププ 中 を 追い 出せ る か 
も し れ ま せん . それ と , 残り 0 ステッ グ は だ 
ЭЕТ Ta ZTE, 


[4][6@| て な 右 に 1 マス プ つ っ 動き. lallw 


で 左 有 有 に ジャ ング し ます . そし て [|[ 引 で ババ 


それ も 2 筒 月 も か け て いう 価値 は な い . 


まで ソ 


乱文 失礼 し まし だ た . それ で は また 会 う 日 


p PiOPiOC ЬО 75 С, 「 〇 〇 か ら メ メ へ 買い か える な 」 「 へ へ を 売る ん じゃ な い 」 と か いち いち うる さい ん だ よ 。 "Yee 
想 の 押し 売り は も う ご め ん が だ . 


(一 般 入口 担当 の ドリ ー ム ナイ ツ 残 党 ) 


Pio 


ーー BOMB FIGHTER BASIC リ スト 


iJ НЕН 440 
10 PRINT * пово 71 290 ІР RA9ijF Asil; 
ant"itbÜSup 25) IF HIDOH8- 512 
28 VAC :5=3:Н=1 z“ * THEN 440 
38 F=H+á;T=RRN8*6+ 293 IF Aad Я=11 
ЕРЕН 1 中 THEN 44M 
388: 4-1: Y= 5 296 ІР Тг ІР Вей T 
dä ІР FRAC (Ң/2ай; i НЕҢ 44ӣ 
$z"":FOR ігі TO ; 388 IF Вей ІР 8551 
jü:$2$4" ENEN 5 НЕН 448 
11 5 318 ІР Hz1l:IF ESR 
SB B-8:822:0-i:j-à 3 THEN 448 
:К=й:0=й:Р=й: у= 1 515 IF Iz1;!F ñ=2;P 
il : RINT CSR 2; "1°; 
68 IF üzÜ:IF ТЯМ У “10: -0%106 
ЕНЕ HC 2! 328 ir K=ijĦ=M-1: IF 
JTSBN 518-С5556 MID. is n Wii THEN 55 
N (1-{ :МОрЕ 3+6 325 W-W-i:IF Wl TH 
18 IF RANE). 3:2-18|| 22 IF j=l; PRINT (5 EN 435 
` 3 &RRNÉxIOSTITI- 258 БОТО 68 
1 F gcRiP || 340 FOR =й TH 148: 
SB iF ҚАНЫ TS: I-H RINT ob Te NEAT L 
38 IF 5=1;E=E-1:1IF $eB FOR ісй iC 48: К 
ZSHIL. I EAI し 
188 IF KEY=『4"!H=H+ " S58 FÜR (=й TO 20:N 
SON iü-R Pl ENT. L: RETURN 
118 IF KETz*&":RER4 ; 318 IF Әзір IF ñ=B;P 
SGN (ii-n Ü RINT CSR Я; "49" 
128 ІР КЕҮ= HIF f 338070 486 
2irWNz-1:808UB 7 は 360 IF 823 IF Asil; 
78 k PRINT CSR ñ-1;' 
158 IF KEYz'W':IF ñ | IF 04:16070 4MM 
171IGUSUB 1 R 2 338 PRINT CER ARID 
70 IF (8-1: 12:CSR В 
i48 IF KEYS"S" THEN 1 855 "9"; 
i58 IF 430 GÜSUB 3o8:n-R*N 


*2: RETURN 
418 GÜSUB 248:PRINT 
PRINT "clear! 
“BOSUB 348 
428 О=й+й*Н:Н=ЕН+1:1 
F FRAC (H/2-W:b 


948 IF BBS (2-5 
` НЕН 578 

S58 5070 » 

Sb9 $-MIOCI 46-2) 

ë = M "RE 


TURN 
al 578 PRINT Ç CSR Ui X" 
458 PRINT :PRINT "r “ЗІР C=D THEN é 
eund" : Нз: 60506 дй 
548:8070 20 558 ІР Й-йде с ЕСІК 
455 PRINT PRINT 5 T ¿pRNBR*5+8;50T 
tigen empty: 5:6 Û $8 


SUB 348:60T0 4 || 520-5070 520 
000 F-F-1:9- 0%10:60 


t Jb: i Fils 


PRINT CSR Я; "x? 

::6=6-1:6050В 3 

ӘШІР 5<1 THEN 

478 

458 PRINT :PRINT * 
left “ИРЕК I7i 
Tü 5 | 

468 PRINT "a*::NEXT 

1150508 348:60 

TÜ 58 

478 PRINT :PRINT * 
заве over:^::50 
SUB 348 ; 

488 PRINT :PRINT * 
score" (i? MODE 
4: END 

S30 PRINT CSR D 
божур КЕЙ 
UB 558 

IF RBS 


ziNT UIF C 
NT T;J=110=D+ 


- 
: 605 


(R- T 


MAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAON 

900000000000000000000000000( è lat. W з ТТР s ow 0000000000000000000000000006 
۸ v SVAVAVAVAVAVAVAVAVAY, 

$00999000090000000000 000 000. N М іші," “ЗӨ ¿SÇ Q, ӨӨӨ ӨӨӨ ӨӨ ӨӨӨ ӨӨӨ Ө 


WATA YAPA YAYATA TATATA TATYATYAYAYATAYAYAYATYATAYAYOYAYAYAYAYOYAYOYGYATAYGTYOYGYGYQ YQ YYYYYYYYYYYYYYYYYYYYYYYY 


じ リ プレ イヤ ・ コ ン ボ ポー ネ ント 
DAD-5000- Wing W5 


曲 / 録 青 リ バー ス ・ ダ ブル デッキ を 搭載 > 


較 ( 株 ) 日 立 製作 所 より , 多彩 な 機能 を 装備 
し た , 幅 320nmm の コン パク ト CD プ レイ ヤ 
"DAD-5000" と , ダブ ル ・ デ ッ キ を 搭載 し 
た 小形 コン ポー ネン ト ・ シ ステ ム . "Wing 
W5" が 発売 され まし た . 
《 特 徴 〉 
DAD-5000 ゅ ラン ダム ・ メ モリ 選曲 , イン 
デック ス ・ サ ー チ , 選曲 頭 出 し ポー ズ , Н 
在 リ ピー ト な どの 多彩 な 機能 を 搭載 y 小形 
コン ポ Wing シ リー ズ 搭 載 テ ー プ ・ デ ッ キ 
と の シン クワ ロワ 録音 が 可能 上 タイ マ ・ ス ター 
F 機能 を 装備 区 ヘッ ド ホ ン 端 子 ・ ボ リュ ー 
AT» SE : liget аа hh 
> 重量 : 3.9kg | 
. Wing W510 キ ー ラ ンダ ム ・ メ モリ 選 


独自 の イン デック スト レー ス ・ ダ ビン グ や プ ブ 
жылғалы. АҒАҒА metae 4% 
ビン グ な ど 多彩 な 機能 を デッキ に 装備 > 
- Zv 4 >, 
CD プレ イヤ と の シン クワ コロ 録音 可能 ゆ 音 づ 
くり を 楽し め る 5 素子 グラ イコ と スペ クト 
МҚ, to 
ショ ン 機 能 を 搭載 を アン プ , チュ ー ナ , > 
ッ キ 部 に ダイ レク ト ・ コ ネ ク シ ョ ン 方 式 を 


ンダ ム ・ メ モリ 選曲 フル オー ト 


ラム ・ ア ナラ イザ 付き オー ト 


採用 
《 価 格 〉 


DAD-5000 Ұ59,800 
Wing W5  YX203,000(CD7v 4 > € & 


まな い 組 み 合 わせ 価格 ) 


< 問い合わせ 先 〉 (株) 日 立 製 作 所 

«4105 東京 都 港 区 西新 橋 2-15-12( 日 立 愛 
EU 

人 (03)502-2111 (大 代表 ) 


倍速 ダ 
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— +. 初回 に お いて は “Location 三 "と 聞い 
て きま す の で , モニ タ の マシ ン 語 ルー チン 
を 配置 し た いひ 番地 を “ы” を 付け て 入力 し 
て くだ さい .。 Zi, IOL à [ENTER]? V 
を 押す と , 自動 的 に BASIC エ リア の 最後 尾 
に 置か れ ま す 


付け ず に 16 進 数 で アド レス を 入力 し て みて 
くだ さい . [ENTER | に よっ て 入力 し た ア 
ドス か ら 。。 8 フイ イト 分 の デー タ と チェ ッ 
クサ ム が 出力 る され ます . その 後 , 再び 
"?” が 表示 きれ る の で , 同様 の 操作 を し 
кте. 


プロ グラ ム は す で て BASIC で す の で , まだ , アド レス と 同時 に 8 バイ ト の デー 


この と き に も 結果 が チェ ッ ク サ ム と と も に 出 
力 る きれ ます (アド レス , デー タ そ れ ぞ れ の 
間 に ス ペー ス を 入れ て も 構い ませ ん が , 必 


ó:à-&6B39: INPUT "Loca 
tion-z"*ü 

2:POKE 8»135»2»1й9»219 
132 2571165219 2513955 
As ib, B | 3,29, 56 | 

3i PHKE й+16,1Й3,32,557+ 
4 183 4Bs 48523 5256551 
8547.40» 23 2566 

4:POÜKE A*-32:182:42:48: 
2,2:67:1й5,45»40» 352 
s68, 103,43, 40:3 

S:PÜKE ñ+43 2:59 18354 
5. 4B Í 3 2 Í 702117348351 
B2 .1B (5352351175 7 

&:POKE +64» 19 15,157 
:71.47:58:130:193523 
ій, 1335,219,152,218,2 
19:16 

Т:РОКЕ 8%8й»111:56:87» 
183:196»58»7»4»5,162 
s B 7а 2553231 

Ә:РОКЕ 8%96»523 3,8, 162 

‚19,35:0:.6:.8, 56,1351; 


58»189:219,41,12 

Ә:РОКЕ ñ+112 1785621352 
19:1535:2»1й9:219:134 
2 711219 2 Í 21552515 
8:89 

18:РОКЕ 8%128»88»1ййз15 
з116:48»,103»58:58%5» 
116»7:58»,134»99:75»4 
5 

11:РОКЕ 8%144,4»2»5258 
.99,92,40,4,2,59› 58, 
1і7й:0й› 10,29,47 

12: РОКЕ й+16ӣ› 34,550, 2 
33163182» 723144:24:1 
2031283845553 80: 1516 

13: POKE й+176› 108 240, 1 
44:24 246 Í 5811525835 
188:15:116»43:182:58 
‚58,3 

14: PÜKE à*192:116:7516* 
189575332389, 893.5 188: 

15:116:438:1803:53:58: 


3 
: 


KAM 2-861277 
ЖАР . は いい です 
け で て サロ. の 転送 


Poo гоа HESKA L 
2444. ЁЙ SE 4317 


あたい に は ば と "が る < 
532 3 REA? 

て PS ゝ 
を - は た da K29- 9X1. 


eg: dS いい て 見 3 
"Ska SEY b ef. 


浦和 市 TECHIE 名 古屋 市 YANMO 


PC- | づら 用 


"?" が 表示 られ た だ たら, 今度 は "&" を 


リス ト 入 力 に 関し て の 特別 な 注意 点 は あり タタ も 入力 する と , それ ら が 書き 込ま れ ま す . 


2 35, ГЛЕН Jia それ ぞ れ A 


ーF へ 変換 る れ ま す . 


アド レス 入力 の 際 に |ENTER| だ け を 押す 
Lh, この モー ド に な り ま す 。 "Startm 
ぉ よび "End=" に , 相方 "&" を 付け て 
アド スズ を 入ら に て で が だ る 

この と き , どちら か が 無 入 力 だ と 元 の 
モニ タ ・ モ ー ド へ 戻り ます . まだ End が 
Start よ り も 小さき いと き は , 再 入力 と な り 
š T, 


デー タ を 入力 する とき に , 8 バイ ト 未 満 

で [| ENTER | を 押し て し まっ た 場合 に は , 

デー タ の 書き 込み は 行なわ れ ま せん . 
ұз, 作業 を 終了 する と き に は 直接 


[ВЕК | を 押し て くだ さい . 


初回 は RUN [ENTER . 次 回 か ら は [Dera ず 入 力 は 1 行 以 内 に 留め て くだ る い ). 
i | PC-1350 用 チェ ッ ク サ ム プログラム WENN 


15:РОКЕ A+283,sllb: 7» 16: 
109:74»82:155»89»10й 
:315:116»48»105з58»58 
E 

16ІРПКЕ й8%224:%1165»7:16» | 
1й9:75»82.89»88:100; 
15:116s548:183:58:58: 
3 

іт: РОКЕ à*248:116575316? 
1895 72:32:55 

13: "ñ" WAIT B: CURSOR 4 

8: PRINT “= ここ = ーー で em 

19: INPUT B$: CALL ñ: 
PRINT : GOTO 19 

20: INPUT "Startz"sBs"E 
n d=*sC: GOTO 22 

21:G60T0 18 

22:IF BC GOTO 28 

23:FOÜ0R В-В TO С STEP 8: 
CALL ñ+173: CALL ñ: 
CALL ñ+162: NEXT B: 

GOTO 18 


富山 県 雨 野 古 子 


O Q ©) と どー で も いい こと な ん で すけ ど ,。 みん な コー ヒー 片手 に … と いい ます が , 個人 的 に は ココ ア や ホッ トミ ルク の 方 が いい と 思う の で す が . を 
СА ОА L nt, 夜中 に コー ヒー を 飲み すぎ る と 胃 を 悪く し ます . 気 を 付け まし ょ う . PS ば ん ぷ き ん ば いる きん, 6 月 号 p.28 の 「 パ ンプ キン パイ と シ 
ナ モ ンティー」 で す が , あれ は 音楽 の 曲名 だ そう で , あな た と は 一 切 関係 な い (と 会 誌 に 書い て あっ だ た) そう で す . 安心 し て くだ きい . P.S. 

2 PiOPIO は オチ が つか な いと 載ら な いと いう ウワサ が …. 


(NCPC 会 員 No-_ い ちの 馬車 別当 ) 


画 シ ャ ー 7(Ж) 5 U, RAM 容 量 4K バ イト 
と 高速 演算 を 実現 し た PC-1247 と, 電子 メ 
モ 機 能 付 き の PA-500 が 発売 され まし た . 

《 特 徴 〉 

PC-1247 匠 普及 タイ プ で あり な が ら 実 務 計 
算 に 要求 きれ る プロ グラ ム 容 量 (4K バ イ 
F) と 高速 演算 を 実現 内 BEEP 音 機能 付き 
豊富 な ソフ トウ ェ ア が 活か せる 上 位 機種 
t HIED # 5 BASICZ ñE 2 FR Hi P E it 


POCKET Cc 
— ^: CORN A 
o COMPUTER PC-1247 


í 
} の 
H 2 


ポケ ッ ト ・ コ ンピュータ 
PC-124/・PA-500 


PC-1247 %16,800 

PA-500 %18,000 

《 問 い 合 わせ 先 》 

コン パク ト ・ サ イズ ( 幅 135 ぶ 奥行 70 メ 厚 る < 大 阪 > シャ ー プ (株 ) 経 営 企画 室 広 報 
9.5mm, HÊ ® 95g) &»545 大阪 府 大 阪 市 阿倍 野 区 長池 町 22-22 
PA-500 電話 帳 , スケ ジュ ー ル , 自由 メ 2 (06) 621-1221( 大 代表 ) 

モ 機 能 上 5 メモ の 入力 は , 簡単 操作 の ロー マ < 東京 > シャ ー プ (株 ) 東 京 支社 業務 部 広報 
字 カ ナ 変 換 方 式 携帯 性 に 優れ だ 折り だ た 45162 東京 都 新宿 区 市 谷 八 幡 町 8 

み 式 手帳 サイ ズ 見 や すい 16 桁 2 行 の 液晶 (03) 260-1161( 大 代表 ) 

表示 標準 1380 文 字 , 最大 7500 文 字 ( オ プ 

ショ ン ) ま で 記憶 可能 事務 計算 に よく Ж 

用 きれ る BASIC を 搭載 


画 ( 株 )HAL 研 究 所 より , 任天堂 ファ ミリ 
ーー ゴン ビー タタ 用 に シン Б 0 – 5 ЈОҮ 
BALL が 発売 され ます (8 月 中 旬 ). 
(FE) 
BALL 形 状 の 操作 部 分 区 従 来 の ジョ イス 
ティ ッ ク に 比べ 操作 性 が 一 段 と 向上 子供 
の 手のひら に も すっ ぱり と 入る 大 きる さき ( 直 
径 75mm) 操作 の や りや すい ボタ ン の 大 き 
きる ょ 位置 関係 区 内 部 回 路 の 改良 に よる 面 期 
的 な 連射 装置 見 ハイ テク 感覚 の 色 と 全 体形 
状 
(HF) ҰЗ,980 
《 問 い 合わ せ 先 〉 (株 )HAL 研 究 所 
110 東京 都 台東 区 台東 2-19-10 

木村 屋 ビル 4F 
7%(03)834-7671 


ツー プロ パソ コン 
FS-4000 


ШҒ5-4000(3, 一 台 で ワー プロ と し て も , 
パソ コン と し て も 利用 で きる 多 機 能 MSX 
мао е. 

《 特 徴 》 

ブリ ンタ と 漢字 ROM を 内 蔵 ЗЕ Н 
レビ を ワー ブロ 画面 に 利用 可能 胃 16 メ 16 ド ッ 
F の 熱転写 ゲ リ ン タ 内 蔵 共 和文 は も ちろ ん , 
英文 ワー プロ と し て る も 使用 可能 データ ・ 


カー トリ ッ ジ , 3.5 イ ンチ ・ フ ロッ ピー デ 
ARZ, テー に 文書 の 保存 が 可能 

《 価 格 》 Ұ106,000 
《 問 い 合 わせ 先 》 
情報 機器 部 

&»571 大阪 府 門真 市 大 字 門 真 1006 
7% (06)908-1151 


松下 電器 産業 (株 ) 
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日 本 語 ワ ー ド ブ プロセッサ 


カシ オ ワ ー ド HW-100・HW-200 


画 カ シオ 計算 機 ( 株 ) よ り , パー ソン ナル 日 本 
語 ワ ー ド プロ セッ サ “ カ シオ ワー ЕНУ/-100- 
HW-200( マ イタ ロディ スク 内 上 蔵 )" が 発売 さ 
れ ま し た 。 

(99180) 

p 自然 な 話し 言葉 が その まま 入力 で きる 
“口語 文章 入力 方 式 ” 最大 44 桁 X30 行 の 
高度 な レイ アウト 表示 機能 上 e アン ダー ライ 
м, 倍角 ・ 半 角 印 字 , セン タリ ング , яж 
せな どの 上 豊富 な 編集 機能 上 本格 的 な シリ ン 
ドリ カル ・ ス テッ フキ ー を 装備 上 ゅ 持ち 運び 
に 便利 な コン ラペ クト ・ タ イプ ee ワンタッチ 


で 本 体 に 装着 で きる RAM パ パック ( オ プシ 

чх) 1 枚 の ディ スク ・ シ ー ト に 約 26 ペ ー 

ジ 分 の 文書 が 保存 可能 eg 就 語学 習 機能 

《 価 格 》 

HW-100 Ұ59,800 

HW-200 3X89,000 

《 問 い 合 わせ 先 》 

広報 室 

&»160 東京 都 新宿 区 西新 宿 2-6-1 05275 
新宿 住友 ビル мл 

7%(03)347-4830 


カシ オ 計 算 機 (株 ) 


日 本 語 ワ ー ド ブ プロセッサ 


画 キ ャ ノン より , 家庭 用 日 本 語 ワ ー ド プロ 
セッ サ ( ワ ー ド ボー イ ) の 第 3 弾 "キャ ノン 
PW-10S" が 発売 され まし た . 

(99180) 

ひら が な 50 音 縦 配列 キー ボー ド 操 作 に よる 
“あと か ら 変 換 " 方 式 を 採用 了 使用 場所 を 
選ば な いす で ぐれ た 携帯 性 ( 幅 316 メ 奥行 299 
x 高き 51.2mm, 重き 2.5kg) P 高度 な 文章 レ 
イア ウト 機能 (最大 42 桁 4 行 分 の レイ アウ 
F 表示 ) p 指定 され だ た フォー マット 用 紙 に 


PW-10S 


自由 に 印字 で きる 位置 指定 印刷 , 部 分 印刷 
機能 な どの 豊富 な 印刷 機能 上 e あい きつ 文 や 案 
内 文 な どの 定型 方 書 25 種 類 を 内 蔵 上 内 部 文 
章 メ モリ 

(m) Ұ89,800 

(問い 合わ せ 先 》 キャ ノン (株 ) 

&»160 東京 都 新宿 区 西新 宿 2-7-1 

会 (03) 348-2121 


日 本 語 ワー ド プ ロ セ ッ サ 
MINE( マ イン )FW-200 


田 MINE( マ イン ) は ,“ 連 文 単 漢 入力 方 式 " を 
装備 し た , パー ソナ ル 日 本 語 ワ ー ド プロ セ 
ッ サ で す . 

《 特 徴 〉 

あら か じ め 入 力 し て お な お い だ か な 文字 ( 最 
大 47 字 まで ) ж, 先頭 か ら 6 順に か な 漢字 ま 
じ り 文 に 変換 す る , “ 連 文 単 漢方 式 ” を 採用 
外部 記憶 装置 “RAM パッ ク ”" を サポ ー ト 
p > 4 線 機能 , 学習 機能 , 4 行 分 の レイ ア 
ウト 表示 。 倍角 , アン ダー ライ ン , セン タタ 


日 本 語 ワ ー ド プロ セッ サ 


ヒッ ト ビッ ト ワー ド HW-30 


ШНУ/-30(3, 簡単 で 使い や すく , どこ で も 
_ 自由 に 持ち 運べ る ハン ディ タイ プ の , 日 本 

語 パ ー ソ ナル ・ ワ ー ド プロ セッ サ で す . 

《 特 徴 》 

初め て の 人 で も すぐ で 打てる 50 音 順 配列 キー 

ボー ド か な / ロ ー マ 字 入力 に よる 漢字 変換 

方 式 際 一 般 文書 作成 に 必要 な 3,526 廊 字 を 内 

蔵 上 ゆ ひん ば ん に 使用 する 熟語 10 種類 ) や 文 

章 (1,280 文 字 ま で ) を ヌス モリ 可能 p12 桁 表 

示 の 見 や すい 液晶 ディ スプ レイ 秒 音 の 静か 


Q (O) © 
is 


大 森 第 二 別 館 ) 


れ だ たら うこ を で て ・:。 


リン グ な どの 充実 し た 編集 , 校正 機能 ゆ 一 
括 / 逐 次 印刷 , 縦 書 / 横 書 印刷 な どの 豊富 な 
印刷 機能 区 キー ボー ド は JIS 準 拠 " ロ ー マ 字 
入力 "と “50 音 横 配 列 " の 2 つの 入力 方 式 を 
жн» 本 体 色 は 白 と 黒 の 2 色 を 用 意 

《 価 格 》 Ұ98,000 

《 問 い 合わ せ 先 〉 (株 ) 日 立 製 作 所 

&»108 東京 都 品川 区 南大 井 6-27-18( 日 立 


会 (03)763-2411( 大 代表 ) 


16x16 F » К ик U) z AP ST 
状 な どの 作成 に 便利 な カラ ー 印 刷 機能 ( 黒 , 
Жж, 青 , kk, 茶 の 5 色 ) 区 キャ リン グ ・ ハ ン 
ドル 付き で スマ ー ト な デザ イン ( 幅 346X 奥 
17300 х 65 2 64mm, 重き さ 約 2 .6kg) 

《 価 格 ) Ұ98,000 

(問い 合わ せ 先 》 ソニ ー( 株 ) 広報 室 
89141 東京 都 品川 区 北 品 川 6-7-35 

会 (03) 448-2054 


- 匠 7 月 号 p.94 の PAL さ ん へ . 与え る ダメ ヌメ ー ジ の 小さ きい 順に 番号 を 付け て くだ きい (1, 2, 3), そし て コレ を 持っ て いる 人 の 「 力 」 の 数 値 と の 
積 を と っ て , コレ を その 武器 で 与え られ る 最大 値 と し ます . T, この 数 を A と で も し て , RND(1)*A で めで だ た し めで だし. 0 の と き は か わる 
つい で に 火事 場 の … で , と きど き そ れ 以上 の も 入れ る . これ ら は 「 プ ラッ クオ キ ニ ス 」 を 参考 に し て 書き まし だ . 34 
U. p.101 に あっ だ 「 バ ル ザ ス の 要塞 」 は オモ シロ イ で す ョ . 


P.S.1 バザー ル と COM の 会 で は 本 人 (会 長 な ど ) の 年 令 を 書く べき で ある . 


日 本 語 ワ ー ド プロ セッ サ 


マイ リポ ボート 10( も の か きぐ ん ) 


較 マ イリ ポー ト 10 は ,“ ケ イ 線 機能 ” を 備え 
た , 9 万 円 台 の 高 性 能 フ ァ ミ リー ワー ド プ 
ロ セ ッ サ で す . 

(99180) 

50 音 配列 の ひら が な 入力 と JIS 配 列 の ロ 
ー マ 字 入力 の 2 通り の 入力 方 式 を 採用 最 
初 に か な を 入力 し (最大 47 文 字 ), 文頭 か ら 
単 漢字 変換 する “一 娘 単 漢字 変換 方 式 " 
REPRE, 横 の ケイ 線 を 引け る “ケイ 線 
ЖЕНЕ” 2 mp レイ アウ ト 表 示 が 可能 な 12 
字 Xx2 行 の 液晶 ディ スプ レイ 移動 , 右 寄 


日 本 語 ワ ー ド ブ プロ セッ サ 


ea 


ミー 書院 WD-100 


E: = Шр, WD-100(Z, 約 8 万 語 の 辞書 
ZAR LZ, パー ソナ ル 日 本 語 ワ ー ド プロ 
セッ サ で す . 

《 特 徴 〉 

ワー プロ を より 身近 に し た コン フク ト 設 
ДРОВ 330 х 29.17 312 х 5 5 510, 重き 3.8 
kg) > 豊富 な 約 80.000 語 の 辞書 内 蔵 助詞 , 
助動詞 な ど を 意識 する こと な く 変換 が 行 な 
える , 高度 な か な 漢字 変換 方 式 上 ゆか な , ロー 
マ 字 の 2 ウェ イ 和 入力 JIS 配 列 の 本 格 的 な 
タイ プラ イタ ・ キ ー ボ ー ド 常用 名 登録, 
外字 作成 , 記号 入力 , 編集 機能 な どの 多彩 


圏 SUPER ピ コワ ー ド 300 は , 専用 外部 記憶 
装置 "FB-200" と の 接続 で , 文書 保存 が 便 
利 な 日 本 語 パ ー ソ ナル ・ ワ ー ド プロ セッ サ 
(Tt. 

(FEE) 

24x24 F > F O f A HRBIEENF e 2 27 
キ か ら B4 サ イズ 用 紙 ま で 印字 可能 了 e か な 
入力 に 加え ロー マ 字 入力 も 可能 区 ひら が な 
連続 入力 熟語 変換 方 式 芝 3.5 イ ンチ ・ フ ロッ 
ピー ディ スク ドラ イブ (FB-200) と の 接続 


ШОА5У5 Lite は , 誰 も が 簡単 に いつ で も 
どこ で も 使え る , 日 本 語 ワ ー ド プロ セッ サ 
X 22 

《 特 徴 ) 

自由 に 持ち 運び が で きる ポー タデ ズル 設 言 
( 幅 340x 奥 行 325X 高 き 80mm, Ж 3 3.5kg) 
親指 フト ・ キ ー ボ ー ド , 対話 式 か な 漢字 自 
動 変換 を 採用 豊富 な 単語 辞書 ( 約 40,000 
8)» Н, Ж, Jh, 仏 , スペ イン 語 に 対応 
p 縦 / 横 倍角 文字 , 4 倍角 文字 , レイ アウ ト 
表示 , 単語 検索 な どの 豊富 な 機能 p24 ドッ 


PS.2 i—uv/ 仙台 の K 中 学 を 卒業 し た MZ-1200 の 佐藤 俊也 / 最 近 PiO に 出 な いけ どど うし だ ?2 M 高 に 入学 し だ た ん だ っ て ? こっ ち は ト ナ 
リ の M 高 だ ョ / 文 化 祭 の と き 遊 びに 来い や /IKA と 来れ ば すぐ に わか る ョ . 
で すか ? ペン ネー ム だ け の は すべ で て ボツ に な っ て いた の で …-。 


日 本 語 ワ ー ド プロ セッ サ 
SUPER に ゴ フード に トド 900 


日 本 語 ワ ー ド プロ セッ サ 
OASYS Lite( オ アシ ス ・ ラ イト ) 


文書 通信 機能 (オプ ショ ン ) 


г, “САЛЫ ЖҰТ er Шы OP A ЕЁ, 
多彩 な 編集 機能 を 4 色 ( 黒 , Jk, T$, ЖО 
イン ク ・ リ ボン > 外部 記憶 が 可能 (オプ シ 


= Z) 


(40148) \98.000 

《 問 い 合わ せ 先 〉 (株 ) リ コー 販売 本 部 

85107 東京 都 港 区 南青山 1-15-5 IrYrYTYTTTÀT 
(リュ ー ビ ル ん ) ооэоооөоо | 


T (03)479-3111 (代表 ) «ә a» a» исо, а 


な 機能 英文 ワー グロ 機能 4 種類 ( 黒 , Ж, 
W, 茶 ) の 印字 色 p 電源 を 切っ て も 文章 が 記 
憶 き れ て いる , メモ リ 保護 機能 付 

(ІШЕ) Ұ148,000 

《 問 い 合 わせ 先 》 

< 大 阪 > シャ ー プ (株 ) 経 営 企画 室 広報 
B545 大 阪 府 大 阪 市 阿倍 野 区 長池 町 22-22 
会 (06)621-1221 (大 代表 ) | 
< 東京 > シャ ー プ (株 ) 東 京 支社 業務 部 広報 
45162 東京 都 新 宿 区 市 谷 八幡 町 8 

1% (03)260-1161 (大 代表 ) 


に より , ディ スク 1 枚 に 約 9 万 字 の 廊 書 が 
保存 可能 ゅ 機動 性 に 富む 小型 サイ ズ ( 幅 370 
х #17308 х |8 576пп, 重き 3.3kg) 音響 
カプ ラ を セッ ト す れ ば 通信 が 可能 

《 価 格 〉 

SUPER ビ コワ ー ド NP-300 X148,000 
専用 外部 記憶 装置 FB-200 — X40,000 

《 問 い 合 わせ 先 〉: プラ ザー 工業 (株 ) 
9467 愛知 県 名 古屋 市 瑞穂 区 堀田 通 9-35 
会 (052) 824-2072 


F O А 8 ER 2° U) > Z EH p. 文書 の メモ 
リ ・ バ パッ クア デップ 外部 記憶 装置 と し て 
ブル ・ メ モリ を 採用 (オプ ショ и) Р 
OASYS シ リー ズ と の 互換 性 (オプ ショ ン ) 


《 価 格 》 ¥220 , 000 

《 問 い 合わ せ 先 〉》 富士 通 (株) 広報 課 
45100 東京 都 千代 田 区 丸の内 2-6-1 
(古河 総合 ビル ) 

7%(03)215-5236 


P.S.3 工学 社 は 出所 の わか ら な い ハ ガキ は ボツ に する 主義 な の 
(ADV は 好 か な い . RPG が 好き / TACO&IKA brothers) 


17S 


市 販 ゲ ー ム の 秘技 を 大 公開 / 


ТЕТІК ac 


444 4 4 4 4 «4 & € & € € & € € € € € € € & € € « € 


か わい い ベ ペン ギン 君 が 登 場 す る 
PENJAMIN. その テク ニッ ク を 公開 する 
まえ に , まず 使用 上 の テク ニッ ク か ら 

EDIT モ ー ド で | HELP | キー を 押す と 注 
意 が 出 て きま す が , ここ で も 同じ こと を 言 
いま す . ディ スク を 使っ て いる と き に , デ 
ィ ス ケッ ト を 抜い た り し な いで くだ さい . 
実際 ゲー ム が 破壊 され て し まっ た 人 が いま 


+. EDT モ ー ド は , ゲー ム の 面 を 変え た 
り ボ ポ ボー ナス の 点 や 取り 方 を 見 た りす る の に 
使い ます が , 面 を セー プ す る コマ ンド を 実 


行 中 に ディ スケ ッ ト を 入れ 換え た りす る と , 


ディ スケ ッ ト の 内 容 が 壊れ ます . 皆さん , 
よう 、 
Сіз, いよ いよ テク ニッ ク 公 開 で す 、 


Dl | PEROT 


psi も の LUC, ジャ ング する と 敵 
と 擦れ 違え を る と いう こと が あり ます . し か 
L, 頭 が 障害 物 に 当たっ た と き は ジャ ンプ 
が 解除 き 必 し まい まず 。 Эл, ジャ ンプ 
に は 他 に も 使い 方 が あり , 階段 状 の ブロッ 
ク を 登る の に 使っ た り , 作り か け の フロ アデ 
の 前 で ゲ ジャ ンジ を する こと で フン ロ デ を 2 デ プ 
ロッ ク 分 開け て 作り , 敵 を 落と すこ と な ど 
が で を ます, 

あら に た に 話 放 な テク ニッ ルッ みみ とし に で と も イ ' 守 
バ の 白 ウ サギ 」 と いう 大 技 が あり ます . 2 
れ は 敵 の 落下 中 は ペン ジャ ミン が 敵 の 上 に 
乗れ る こと を 利用 し , 敵 の 上 を ジャ ンプ し 


て フロ ア の 端 か ら も う 一 方 の 端 へ 行く 技 で 


カー ソル ・ キ ー を 下 へ 近 す と 落下 速度 が ア 
ッ グ する こと を 利用 し て いま す 。 


これ ら の 技 は , 知ら な いと クリ ア で きだ な い 
面 も あり ます . 

ЭТЕТЕНТ (775. これ は だ ん 
詰まり の 1 個 ブ グロック 」 と いっ て , ジャ 
ンプ "の タイ ミン グ が ぴっ だ り 合 わな いと 成 
功 し ませ ん . この ブロ ッ ク の 下 に は 大 抵 チ 
ェ ッ ク ・ ポ イン ト が あり , この 技 が で き な 
いこ と に は 上 に 登れ ませ ん . こつ は プ ブロッ 
ク の 1 個 手前 で ど ジャ ング すれ ば , ブロ ッ ク 
OECS сее Т. 

次 に 図 2-A を 見 て くだ る さい. cni 
シゴ を 壊し , 図 2-B の よう に ハシ ゴ を 作 
れ ば OK で す . ルー ル を 理解 し て いな いと 
気が付か な いこ と で す が , 

次 の 技 は ちょ っ と タイ ミン グ を 必要 と し 
š+. 図 3-A を 見 て くだ さい . フロ アデ の 
下 で ハシ ゴ を 作り , 敵 が ハシ ゴ の 上 に くる 
の を 待ち ます . そし て , ハシ ゴ の 上 に 敵 が 
きだ た だ たら 6 ハシ ゴ を 壊し , すぐ で 横 に 行っ て ハシ 
ゴブ を 作り 上 に 登り ます . 図 3-B が その 図 
CT. これ は 上 で うろ うろ し て いる エス キ 
モー Eg) _ 


や り 方 は 簡単 で す . 


知っ て いる と 便利 な 邪道 の チ テク ニッ ク を 

紹介 し ます . 

まず 。 ク ジラ の 出し 方 。。 同じ ラロ で 30 
秒間 頑張 る と クジ ラ が 出現 し , 壊れ な いび 
ロッ ク を 壊せ る ブロ ッ ク に 変え ます . そ 
の 他 の 出し 方 と し て は , わざ と 敵 に や られ 
れ ば , その フロ ア と 上 2 ブロック 分 の ブロ 
ッ ク を すべ で て 壊し ます . 

次 の 邪道 の 技 は , ハタ を 投げ る と 敵 を や 
っ つけ られ る の で , 上 に 何 も な いと き に 敵 
が 落ち て いた だ とき, 下 で 待ち 構え を て いて シシ 
ュー ティ ング ゲー ム を する 方 法 で す . これ 
は 普通 の 技 と し て も 使え , ハシ ゴ の 下 で 待 
っ て いて , 降り て くる 敵 を 射 つ と いう 陰険 
な 08 た も て きま す : 

他 に も 色々 な 技 が あり ます が , それ ら は 
ここ て 説明 し た 技 の 応用 に な る の て で 省略 い 
"MUES. 

図 2 ハシ ゴ 利 用 の テク ニッ ク 1 


壊れ な い ブ ロッ ク 


1985 年 6 月 。 ガーン ./〆6 月 の 上 旬 に 発売 され た Ec の 雑誌 の 広告 を 見 て くだ さい . 
(6) いか / ХІЕ, FM-77L2 な ど . X1F な ん か model10 が 89.800 円 、 NEW BASIC も 付い て いる / 僕 は 5 月 下旬 に X1 じ を 買っ だ ん が だ. 


C Өм , カ ー 様 , あ まり ユ ー ザ ー を いじ め な いで ノ 


カギ を 何 回 も 取る 人 が いま す が , ЖО» 
ギ は 1 回 取れ ば それ 以上 取る 必要 は あり ま 
XA. #7, ハタ に つい て は 2 ク 個 まで し か 
持て ず , 点数 に も な り ま せん . 

な ぉ な ペン ジャ ミン は , [ESC], 
[INS |, ‚ [РЈе с, の 
o f&| SPACE | キー を 1 回 押す ご と に 一 


増え ます . 


以上 の テク ニッ ク を 使い こなせ る よう に 
な れ ば , 高 得点 も 夢 で は あり ませ ん .* 頑張 
ЭТТ ты 

(41 どん 詰まり の 1 個 ブ ロッ ク 


A の ブロッ ク を 壊し て か ら 、B の チェ ッ ク ポ イン ト 
を クリ アー する 


3 ハシ ゴ 利 用 の テク ニッ ク 2 


ハシ ゴ の 下 て 敵 キ ャ ラ を 待つ ん 


あの X1 シ リー ズ , FM シリ ー ズ に 新 製品 が 出 て いる で は な 


Lex 
(て ん も ん ) 


OOD 


COO 
OO 


uf. 
DOD 


編集 部 で は 


バ パソ コン DJ」 の ロー ド について, みな さん 


に ご 協力 を お 願い し て いま す が , お か げ さ まで 多く の 人 か 
ら の 報告 を いた だ き , と て も 感謝 し て いま す . 

すべ て の 報告 を 紹介 し た か っ た の で す が , 誌面 の 都合 で 
ご く 一 部 の 人 し か 紹介 で きま せん . 

ロー ド で エラ ー が 出 て し まっ た 人 は 下記 の 成功 例 を 参考 


EE くだ さい P 


suy e 


カラ カル 


ゆ ミ ミズ タイ ジ 
@ プ レイヤー : ビク ター QL-7R 

Mat OM ул ree > q php = 

A'T-15EG 

アン プ 1 ビク ター ЈА-541 

カセ ッ ト ・ デ ッ キ : ソ ニー TC-4300 

SD 
ソノシート を 本 か ら 切 り 離 し た ら , 
ター ン ・ テ ー ぞ ル の 上 に セロ テー ブ で 
周 定 し ます (そり を な くす だ め に ). ж 
音 レ ベル は , 市 販 の ソフ ト を 参考 に し 
て 設定 し まし だ た が 。 今月 号 の ソノ シー 
ト は , レベ ル 変 動 が 多い よう で し た . 
S1 の 場合 , ボ ー レ イト (600 ボ ー t 1200 
ボー の 2 種類 ) は 関係 な に よう で す . 

それ か ら ソ ノシ ー ト の 容 が 少し 小 き 
いよ う で , むり に 押し 込む と そ っ て し 
まう こと が あり ます .。 これ か ら も S1 


ホコ リ と 静電気 を 取っ て 


AMI 


Ө” ху 
Q7-4Y—:*Y-7^ YP-D5 
Ñ カー トリ ッ ジ : MC-703 
qoo dr. А 
デッキ : ビク ター KD-A5R 


| Өнітесі н, と うと う 成 功 


し まし だ . イコ ライ ザ な ど は 無関係 だ 
思う アレ ベル は OdB よ り 低 く 〈 く て O.K. 
と に か く ソ ノシ ー ト の ホコ リ と 静電気 
を 当る こも 。 そ も て セロ チー ング ゲ な ど で 
ター ン ・ テ ー プ プル に し っ つか り と 固定 す 


大 友宏 明 


: - @ プ レイ ヤー: ト リオ KP-700D 


| @ ス ター フラ ファイ ター 


ラッ クス L-410 


әйе S OU Ж ышы. еі 27, 


片 チ ャ ン ネ ル だ け に 録音 


トラ ウマ 


Ф: =: = タダ イジ 

@ プ レイ ヤー : テク タニ クス 51-10 
アン グ プ : オン キョ ー А-819СТ 
カセ ッ ト ェ デッキ シー ニ ニー FX- 
1010 

カセ ッ ト ・ テ ー ジ は 普通 の ノー マ 

ル ・ テ ー グ を 使用 。 ドル ビー は すべ ご て 

OFF, 各種 フィ ル タ も OFF に し て 録 

NUUJ7. 


ステ レオ ・ デ ッ キ で 録音 する と き は , 


LR チャ ン ネ ル 両 方 と も 録音 し , パソ 
コン に ロー ド す る と き に ステ レオ <e… モ 
ノ 変換 デラ グ で つなぐ と , 位相 の ズレ 
人 比 和 キ 葉 に よっ て 生じ る ) に より うま 
いか な い 場 合 が ある の で ,. どちら か 片 
方 の チャ ン ネ ル ( テ ー ジ の 外側 に 録音 
る れる R チ ャ ン ネ ル の 方 が 反対 の 面 の 
間 が も れ て くる 可能 性 が 少な い ) の み 
アァ ング の 出力 端子 か ら つ な い だ ほ う が 
ENE СУР бс = 


る (必ず そっ て いる の で ). ノー マル ・ 


テー を 片 CH だ け , ドル ビー を か いけ 
すず に 録音 する こと . 大 変 面白 い ゲ ー ム 
Үэ One й 


Ат? УЯТ ОК. 


紫 崎 笑 梨 菜 


⑨ ガ リオ ン 
ФӨФУ”“ЛЛ-:а->4 
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デッキ : ロ ー デ ィ DW-800 

ЖР; ロー ジジ が HA-202 
私 は 思う の だ が 。 シス テム ・ ユ コン ポ 
Маса ЕЗ << РАУ TUE 
で あの ある こと だ けど 。 レベ ル は 高 日 だ 
する と 1 発 で O.K. 数 あて な どの MZ- 
1500 用 な どの も の も 1 発 ( ほ こり は 取る 
ょ よう に) で ロー ド OK. 


HT*L 


カ m ト リッ ジ オーディオ テ クタ ニカ 
AT- 31 


л С. РР ДР | 


Q7 — 2711Ж 2055-4729, 


な か な か うま くい か な か っ だ の で , ІҢ 
本 パッ コ ュ ユン に ロー ド る せま し た 。 

ソノ シー ト の 音 は 小さ い の で 。 
プ の REC OUT か ら で は 録音 レベ ル が 
TX な すぎ まま する 放さ こ で カセ ッ ト ・ 
デッキ に 録音 する と き と 同 じ よ うに 配 


線 し , デ ッ キ を 録音 状態 に し て , デ ッ キ 上 


の LINE OUT 端子 か ら プ ラグ 変換 ア 
タプ タ を 使っ て 2 や ソコ ン に つなぎ まし 
JK. ロー ド ・ レ ベル の 調整 は OUT 
PUT レ ベル の ボリ ュー ム で や れ ば O. 


ET. 


ІРОЕСУ/>»>-РЖЖ 
uc 


高山 学 

@BOM BER CANNON 
プレ イヤ ー : サン スイ FR-D25 

7 х 7°: A-3001 

デッキ : SC-A11 
⑥ ン ソノ シー ト を 切り 離す と き は , むだ 
な 力 を 入れ ず カ ッ タ ー な ど で 切 り 離 し , 
ソノ シー ト に レコ ー ド ・ ク リー ナー を 


スピ ー カ ー 端 子 か ら デ ー 
タ ・ レ コー ダ に 接続 
阪 山 文 弘 


|| ディ フェ ンダ ー ラ イン 
| の @ ス テレ オォ: 三洋 ォ ッ トー 


デー タダ ・ レ コー ダ : МЕС PC-DR 


330 


| ステ レオ は, 右 ス ピー カー 端子 か ら 


コー ド を 外し て デー タ ・ レ コーダ * の 入 
力 側 に 接続 . 調整 は ステ レ ォ 側 の プリ 
メイ ン ア ンプ の ツマ ミ を 「10」。 デー 
タ ・ レ コー ダ の ロー ド ・ レ ベル を 「8」 


| | で OK で す . すご く 面 白い ゲー ム で す 


13. 

今後 6 で きれ ば 64K バ イト くら い の 
を お 願い し ます . 小生 は , 囲碁 と 将棋 
を 希望 し ます . 


ソン ソノシート を 重ね て 


= M. `La 
吉村 浩治 
W デ ィ フ ェ ン ダー ライ ン 


@ プ レイ ヤー : サン スイ FR-D4 
カセ モ セット ・ デ ッ キ サン スイ SC-33 
C 


デー ター シン ーー SFC ON 


|| ⑥ プ レイ ヤー の ピッ チ の 一 調 整 を 充 
|] 分 や り , 針 圧 は 0.75g 前 後 で , ドル ビ 


ー は ON、。OFF ど ちら で も よい . 録音 
v^t)vi26:3—6.5 CO.K.C L 2-. 
ステ レオ は 旧式 な の で 、 プ レイ ヤー 


| TREBLE 最 大 , BASS 最 少 
に も で 


松村 正人 


07 š z Z 


| @ プ レイ ヤー : オッ トーMICOM 


デッキ ・ オ ッ ト 一 -、MMICOM 

デー ルー ゴー タタ て PC-6082 
⑯ ン ソノ シー ト が 変形 し て 音 が ひ ず ん で 
ぃ い だ の で , 録音 レベ ル を 高め に し て , 
TREBLE K, BASS 最 小 に し だ た だら 
RGDI U $U dois UA, OSES OU 
が 読み 間違い し て BASIC の 方 は BUG 
OUTEUR S デー タビ ゴー 
タダ の ロー ド ・ レ ベル は , 「6」 の 手前 が 
bITETVEOCTU. Dex 
デレ ー を 使う と , 少し は 成功 の 確率 が 
ト に が る よう で す . ソノ シー ト を も う 少 


後 で よく (大 えて で みた 6 ょ アン プ の で 
ッ ド ホン 端子 か ら パ ソコ ユン に 直接 や っ 
た ほう が , 簡単 どっ た か も しれ ま せん . 
誰か や っ て みて < Neo, 


UC LPwa-NEcaxECVe 
8, な ん と だ っ た だ の 1 回 で 成功 し た の 
tT. データ ・ レ ュー タダ ' の ロー ドレ < 
мі, 7 で らい で O. 氏 / ノ 今後 も 6 も よい ゲ 
ー ム を 期待 し て いま す 。. 


は 凹凸 し て いる し だ めか と 思い まし だ 
が 。 PiO の ソノ シー ト を 3 枚 ぐ らい 重 
ね て や る と 意外 に も 一 発 で O.K. で し 
LEVA BASIG EST Ü, マジ 
> I БРО G = 26 a > いじ まし が だ 
(バック アッ プ グ は 念 の 為 と っ と お きま 
BE ay ду А 

PC シリ サー ズ は よ 《 ロロ 一 ド ・ ミ キス が 
あり ます が 。 ほとん ど が ヘッ ド の ズレ 
に よる も の で す . ちょ っ と 前 か 後に や 
の て の で Ç BU. 


ta Lu іс, Сы 


ダビ ング 
TR 3t 76 54. 
OF 1 2= 458—5 4 


@ プ レイ ヤー : テク ニク ス SL-J2 
デッキ で て テクニ ケス SA-X7 
РУР, 
デー В. ози МЕС = PG 
6082 

⑯ レ ベル 二 3 ぐ ら いで 普通 に 録音 し , 

その 後 同じ デー タ ・ レ ュー ダ を 2 人 台 用 

AL, 片方 の CMT OU 端子 と も うぅ 

片方 の CMT IN を ケー デル で 接続 し 。 

LV 10 て AX DU まあ に > а 

ビン グ し だ た テージ を レベ ル 9 一 10 で ロ 

=, DER GRRE 
デッキ て 録音 し た も の で は found し 

な い の で この 方 法 を と っ た の で す が, 

ダビ ング の と き レ ベル が 小 き いと,。 T 

ログ ラム が メチ ャ クチ ャ に な っ て し ま 

е, 
供給 し て ほし い プ ログ ラム は ,。 き て 
らい つ G。 GO ./DRY BATTERY, Z 

ャ ング スキ ー で す 。 


УА СТЕГІ; 


ター ン ・ テ ー プ ル に 水 を 付 
け て 


Q7 š хи, チャ コ ニ ャ ン , Хал 
QT WW (2:72 b F>) 
Q7H = ФО "ババ" の 言う と お り 水 を 
付け て 録音 し 。 ダビ ング し だ た だ たら 大 成功 
で あっ だ .。 これ まで は 全部 あき ら め て 
ね なの だ が 、 ま だ ステ レオ より 才 /U 
^, ドルビー は ON の 方 が 良い で す . な 
お , ダコ ス の よう に 菩 の も の は , ルー 
ル が わか りら な い の で 遊べ な い . 

Hle UL T p Dco? mn wd, 5H 
号 の "Broken" です. で は 皆さん 頑 
張っ て / 


山田 能 之 上 _ 


Ж АЛО) 


: Ж bhn, kire 
* Oo жЕ 
^ e Ei О-2 
E x 


to LA 


今月 号 の 「 迎 夢 快 人 の BASIC 


ВАСІОЯЕ M" 


講座 」 は , 快 人 さん の 都合 に より 


HWS TORELL ZC CELE. 
そこ て で 今月 号 で は , PiQO 編 集 部 が 当 講 座 の 番外 編 と し て , FET 
の BASIC 講 座 の お さら い を か ね た , ゲー ム ・ プロ グラ ム の 徹底 解 


前 を お 届け し ます . 


* f 


プロ グラ ム を 作る 前 に は , 何 が 必要 で し 
ょ うか ? 必要 な 順に 用 意 し な けれ ば な ら 
な い 物 を 挙げ て み ま し ょ 2 う . 

1 : 紙 と 鉛筆 

これ は 絶対 に 必要 で す . 初め の うち は 思 
いつ いた だ こと な ど , どん な 簡単 な こと で も メ 
ШЕТУ 252 15 > mas 
ト 用 の テン プレ ー ト や 定規 な ども 用 意 し て 
3⁄4 k, きれ いな メモ が で き 非 常に わか り 
や すく な り ま す . 

2 : ゲー ム の 構想 

まず は , “どん な ゲー ム を 作る か ” と いう . 
目標 び だ け を 決め ます . 今回 の テキ スト 用 に 
用 意 し た “TREASURE HOUSE" で は , 
* ポ イン ト を 拾っ て ゴー ル に 向かう “ゲーム 
を 作っ て み ま し ただ. 

3 : 画面 構成 の 決定 

ここ で , 実際 の ゲー ム 画 面 を どの よう に 
する か を 決め て し まい ます . これ に よっ て 。, 
どん な ゲー ム に な る か が 大 体 わ か り , きら 
сіз, どう すれ ば より 面白 じい ゲー ム に な る 
か も わか っ て きま す . 

図 1 を 見 て くだ きい. これ は 今回 用 意 し 
た “TREASURE HOUSE" の ゲー ム 画 面 


C3. 今回 は た だ ポイ ント を 拾っ て ゴー ル 
に 行く だ け で は 面白 きる に 欠け る の で , ке 
登場 きせ て その キャ ラク タ に プレ イヤ ー を 
ШБ А С EREL 2 СУ, だ な っ た だ たこ 
れ だ け の こと で も , ゲー ム 全 体 と し て の 面 
白き は 数 段 上 が り ま す . 


フロ ー チ ャ ー ト 


ゲー ム の 基本 方 針 は どい ぶ 固 まり まし た だ 


в, で は , 今度 は も っ と 詳細 な 部 分 まで 設 


し で て な さも まう 
O ゲ ー ム 画面 を 描く . 
@ 自 分 や 敵 の キャ ラク タ を 描く . 
キー 入力 に より 自分 を 動か す . 
ポイ ント を 取っ た だ た 7? (yes なら 得 点 加算 ) 
@ 敵 に ぶつ か っ た ? (yes な ら て へ ) 
ポイ ント を すべ で て 取っ て ゴー ル に 着い 
た ? (yes ら へ ) 
OMED. 
自分 や 敵 の キャ ラク タタ を 消す . 
ラウ ンド ・ ク リア 処理 . 
ゲー ム ・ オ ーー 処理 . 
プロ グラ ム と し て 必要 な 処理 は , だ いた だ 
いで な らい で も ょ 区 。 しかし, この 中 に 
は ちょ っ と し た だ 落と し 究 が あり ます . 
i+, W の キャ ラク タ を 消す 部 分 で す . 


図 1 ゲー ム の 画面 構成 図 


TREASURE 
HOUSE 
НІ- 
Score 
1 : 500 
2 :200 
3 : 100 
Score 
100 
Left 

3 
Round 
1 


P は プレ イヤ ー, E は 敵 , G は ゴー ル , *※ は ポイ ント を 示す . 


Rot ЖӨН ЖТТ 
xe" な ど と し て は いけ ませ ん 。 な ぜ な ら , 
自分 や 敵 の キャ ラク タ が 通っ た だ た 後 を スペ ー 
スス し まう と БЕТИНЕ 

baiulo st) УЧИ C UX u X— 
ム に な ら な く な っ て し まい ます . СЪБ, 
@ と @ の 問 で 自分 や 敵 の いま いる 位置 の キ 
ャ ラク タ を 記憶 し て お か な けれ ば な り ま せ 
ЙЕ; | 

な お , き と の 処理 は どちら が 先 で も 構 
いま せん が ,。 ちょ っ と 注意 し な けれ ば な ら 
な い 点 が あり ます . それ は , "キャラ クタ の 
消 を て いる 時 間 と 表示 きれ て いる 時 間 の ど と 
ちら が 長い か ? “と いう こと で す 。 

消 を て いる 時 間 の 方 が 表示 る れ て いる 時 
問 より も か な り 長 い 場 合 , 画面 上 の キャ ラ 
クタ が チカ チカ と 点 減 し て し まい , 非常 に 
見 プ づらく 《 な り ま す 。 СЕ, いっ だ いと の < 
らい に すれ ば 良い か で す が , これ は 実際 に 
ゲー ム を 作っ て 動か し て みな いと わか ら な 
сос, ゲー ム 完 成 後 必要 に 応じ て 変更 す 
れ ば いい で しょ う 。 

KU, ⑨@ の ラウ ンド 処理 や の ゲー ム ・ 
ォ ー ペ バー 処理 後に ビ こ に 行く か ? と いう 
1:87. ⑨ や ゃ ⑨ の 後に は , ゲー ム に 必要 
な 変数 な ど を 初期 化し な けれ ば な ら な い の 
で すか ら , ここ も し っ か り 押 きえ て お きま 
SÉ se k: 

以上 が "2 n — += ВО НАЖМИ" C 
7, СЕНА, 各自 で フロ ー チ ャ ー ト に 
じ て み て を だ きい : 


озума 
SYO 6A Ko U 


MAE mer, 


ス 43 と か 5 の は 
EZ る も X25) 


NEG SHART. o 


PiO7 月 号 p.120 の S.BEACH さ ん へ . ユー ザー エリ ア A の 使い 方 , 教え て て れ て あり が と う ご ざ いま す . 話 は 変わ り ま す が , 最近 イラ スト の 
レン ペル が 上 が っ て きだ ので, イラ スト を 描こ うと 思っ た けど 自信 が な く な り ま し た . 誰か 僕 に 自信 の つく よう な イラ スト を 描い て くだ さ 
1522 (な が と み だ い すけ だ い /) 


d7U:—A0)8B 


細か い 部 分 は る て お な お き , これ で 大 体 の 処 
理 の 流れ が で できあがり まし だ 。 tb, 5 
一 度 抜け な ど が な いか よく 確認 し て くだ る 
с, この 時 点 の チェ ッ ク が どれ だ け 慎 重 に 
行なっ だ か が , 後 で 出 て くる バグ の 数 に 現 
j tu š т; 

そし て すべ て OK な 6 ら 6 ば 、、 ご ここ て seso L 
コ ペ ゼ ピュー の 琶 場 と な のり ます 。 

まず , グ ブログ ラム を 入力 する 前 に 。 Ф 
体 を いく つか の ブロック に 分 け て し まい ま 
に まつ っ 起き まな プク トル АТРЫ か 
る な ブログ ラム は に 分 割 し , 後 で つなぎ 合わ 
せる 方 が , 初め か ら 一 気 に 作 る より も 楽に 
な り ま す も 、 フ コグ も 退治 じ や す を な りら り ま す 、 

まだ この とき に どん な せ デ ルー チン が 
必要 に な る か と いう こと も メモ し て お きま 
し ょ う 。 後に な っ て あれ も これ も と 考え を る 


A Ai NT 
(= w... 
# ma - 


55302 Mios- 


か うき せんし Э 
pe à peur ese ,! a£ X + X€»33 LZ. 


т ES bat 
ы Neo-? bw&3 43 9590132. 


ій REM XXXXXXXXXXXXXxxxxxxxxxxx 
280 REM X x 
30 REM XXXXXXXXXXXXXXXXXxxxxxXx 
40 REM Initialize 
38 DIM H3» HO =5 
23-108 

68 REM After 


"S 


AB HE 15-2880 НС 


r 


ү. 


Game ver 


70 RÜ-1:SC-B:LE-3 

ӨЙ 50506 зай 

70 REM After Round Clear 

| qaa GOSUB s20 

118 REM After Player Dead 
120 PX-A:PY-1:X1-80:Y1-13 

138 КЕМ Write 


テー 
+ 
= 


CPZSCREENGPX,PY? :C 12 SCREEMNCX 
1,1) 

158 LOCATEPX,PY:PRIMT "Ф" 

158 LOCATEX1,Y1:PRIMT "Ф" 

128 REM Move Player 

180 K-STICKGBD :Y'Y-PY AND 3 

198 メニ PX+ て ドニ ア ) (FX うり 7) (YY イニ 1) -CK- 
S) XCPXC22»5 XCY'Y—1) l 

208 Y=PY-(K=1) %(CP=72) +(К=5› XCSC 
REENCPX ,PY+1)=72) < 

210 IF CP=42 THEM SC-SC*18:P-P-1 
:CP-32:LOCATE24,18:PRINT SC 

220 IF SCREENCPX,PY2-21298 THEN 3? 


sa IF СР=71 AND P-à THEN 
48 REM Mowe Enemy 

SB X2-2X1:Y22Y1:DX-SGNCPX-X125 :DY 
-SG6NCPY-Y 15 

260 IF “ҮІАМ03> <51 THEN 
:GOTO 39886 

270 R-2INTCRND1» X25» *1:0M R GOTO 
280,290 

298 IF SCREEMCX1,Y2*DY?-—72 THEM 
Y2-2Y1*DY:GO0TO 386 

298 х2-хіжбх 

2880 GOSUB 46й 

зій GOTO 14й 

320 REM Clear ! 

3380 SC-SC*ROX180:RO0-RO-*1 


320 


| r3 F3 ™ 


Y2=Y 1+DY 


の は 大 変 で すし , 同じ よう な も の を いく つ 
も 作っ て し まう こと も あり ます か ら …. 

ы, テキ スト ・ ブ ログ ラム の 行 番号 マ 
ッ プ を 表 1 に 示し ます . 先ほど 各自 で 作っ 


JD PARIBUS 


お まけ 

今回 の テキ スト ・ ブ ログ ラム の 中 で は , 
論理 演算 を 多用 し て いま す . この 論理 演算 
は 長い 選 文 を 短く し て くれ る の で , уо 
グラ ム を 見 や すく , か つ わ か りや すい も の 
に し て くれ ます . 慣れ れ ば と て も 便利 な も 
DTT. 

is, ブロ グラ ム 中 に は 論理 演算 に 書き 
直せ る 部 分 が , 他 に も いく つか あり ます . 
論理 演算 を 使う と , どう な る か ? いろ い 
ろ と 各自 で 試し て みて くだ る ふい 。 


340 IF RO»5 THEN ?8 

250 БОТО 1994 

360 REM Dead ! 

370 LE-LE-1:GO0SUB 440 
3880 LOCATE24,12:FRINT LE 
390 IF LE»8 THEN 129 

480 REM Game ロン =F 


418 HC3»)-SC:FOR Ісі TO 3:FOR J=0 


TO 2 


420 IF HCJ) XHCJ* 1) THEN H=H¿<X J} :H 


(Jj -HCJ* 1» :HCJ* 1» =H 
439 NEXT J,I 

448 БОТО 20 

458 REM Erase 

444 LOCATE PX,PY:PRINT CHR$CP» 
478 LOCATE X1,Y1:FPRINT СНЕФСС 17 
4280 PX-X:PYzY:X1-2X2:Y12Y2 
498 RETURN 

500 REM Title 

518 CONSOLE 6,16ó,9 

520 CLS:RESTORE 598 


590 РОК I-1 TO 3:READ A$:LOCATE 

8,15:PRINT АФ:МЕХТ I 

540 PRINT : PRINT 

550 FOR Ісі TO S:READ Af$:LOCATE 

0,15:РБІМТ АФ:МЕХТ I 

550 PRINT:PRINT 
FOR I-98 ТО 


999:NEXT I 


る 99 DATA 
[ ETE 
6198 DATA " 
E 
4208 DATA 


سم 


538 рата 

| " 
る 49 рата 
4 Í " 
る 59 рата 
| " 


リス ト は PC-6000 シ リー ズ 用 で す が , 少し の 改造 で 他 
機種 に も 簡単 に 移せ ます . 他 機 種 の 人 は 記事 を よく 読ん 
C, 移植 に 挑戦 し て みて くだ さい . 


£808 


表 1 行 番号 マッ プ 


A 容 
ハイ ・ ス コア の 設定 な ど 
ゲー ム 初 期 値 の 設定 , タイ トル 表示 
ゲー ム 画 面 の 作成 
А, 敵 座標 初期 値 の 設定 
キャ ラク タ を 描く 
人 の 移動 
ポイ ント を 取っ た ? 
敵 と ぶつ か っ た ? 
ポイ ント を すべ て 取っ て ゴー ル ? 
敵 の 移動 
キャ ラク タ を 消す 
メイ ン ・ ル ー プ の 終わ り 
ラウ ンド ・ ク リア 処理 
ゲー ム ・ オ ー バ ー 処 理 
サブ : キャ ラク タ を 消す 
F7: タイ トル 表示 
+Z : ゲー ム 画 面 の 作成 


プレ イヤ ー 残 り 

ポイ ント の 数 

プレ イヤ ーX, YER 

B X, YER 

プレ イヤ ー の いる 位置 の キャ ラク タ 
敵 の いる 位置 の キャ ラク タ 


[Р] 


テキ スト ・ ブ ログ ラム BASIC! AZ F ШШ 


ا 


444 DATA "| 
2 1 “ 
878 REM Round Init 

588 CONSOLE 5,14,8:CLS 

498 LOCATE24, 1:PRINT"TRESURE" 
700 LOCATE24, 2kFRINT" HOUSE" 
714 _ОСАТЕ24, 4:PRINT"HI-" 

720 LOCATE24, S:PRINT"Score:" 
730 LOCATE24, &:PRINT"1:";H(6) 
248 LOCATE24, ?:PRINT"2:";H( 1» 
758 LOCATE24, SIPRINT"3:" ;H€22 
260 LOCATE24, 9:PRINT"Score:" 
778 LOCATE24,180:PRINT SC 

288 LOCATE24,11:PRINT"Left : 

?98 LOCATE24,12:PRINT LE 
LOCATE24,13:PRINT"Round: 

Sin LOCATE24,14:PRINT RO 

828 FOR I-0 TO S 

230 LOCATE 0 ,2+1х4 
840 РЕ1ЇМТ"+++++++++ +++ +++ +++ + 
+ " 
334 
844 
870 
220 
590 


زا | 


NEXT I 
СФ=СНЕФ (29) + ビ HR 和 ま て 31) :H$2"H" 
HA$=H$+ C$+HE+CE+ HE+ CE+ H$ 
LOCATE 22,13:PRINT"G" 

FOR I=0 TO 2:Ү-2%1%4 

988 FOR J-1 TO RO+1 

919 X-INT(CRNDCI2X23» :1F SCREEN(X 
,Y+3y <>32 THEN 910 

920 LOCATE X,Y:PRINT HA を 

938 NEXT J,I 

94B P-ROXS 

958 FOR I-1 TO P 

FED X-INTCRNDC12 X22) :Y=1+ INTCRND 
OD X241» х4 


78 IF SCREENCX,Y?4232 THEN 948 


984 LOCATE X,Y:PRINT"X" 
998 NEXT I 
1888 RETURN 
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uTEIgERIIIM 


先月 号 で 説明 し た 8 ピット の 転送 命 plu 
つい て は 。 し っ か り と マス ター で きま し た 
か ? 

8 ビッ ト の 転送 命令 は , も っ と も 基本 的 


к бо боер е д рур род д 
оозе S 
і に 4% “é 


š 4; 


eir ツ リト の 転送 命令 
16 ビ ッ ト ・ デ ー タ を オペ ラン ド で 示す 場 
Serm ci 21 す る . 


と 同じ よう も の この 場合 も 転送 元 レ 
ジス タ の 内 容 は , 転送 命令 の 実行 後 も 変化 
UFPA. 

な お , 16 ビ ッ ト の 転送 命令 は 8 ビッ ト の 
転送 命令 に 比べ , 命令 の 組み 合わ せ が 少 し 
し か あり ませ ん . 組み 合わ せ に つい て は , = 
は 
DE, HL, SP, IX, TIY の 各 ペ アデ レジ ネタ 
(後記 ) >, nn は 16 ビ ッ ト の 即 値 を , (пп) は 
16 ビ ッ ト の 即 値 を アド レス と し , その アデ アド 
レス か ら 2 バイト の 内 容 を 示し ます . 

だ た と ぇ ば, LD HL, 1234H の 場合 は 
即 値 1234H を ペデ レジ スタ の HL に 転送 し 


Z を 組み 合わ せ だ た ペア レン レ ジス タ を 使い 24. 


この ペア デア レジスタ の 組み 合わ せ は , ЖС 
も 説明 し だ ょ よう に AF BC, DE, HL, 
SP, IX, IXO 7 種類 が あり ます . 


SZ е 6 の 2 の 56 


e. ے7‎ S を を 679 
0M CX 
を + tt. 


* ra 3 

9252500 аа 555 

Hi 160 ¥ ト 転送 の 命令 形式 に つい cai 
У Е 
Фе 7 и > ッ ス ター ペア レジ $2 スタ 

ペア レジ スタ に は 7 種類 あり ます か が , c 
MENU AT M TM 

み 合 わせ は , 5217533073704. 
BO TW Uca 


| 2 


る 命令 А? は, яз ا‎ 
ペア レジ スタ ー(nn) 
直接 アド レス を 指定 する モー ド (16 ビ ッ 


な 動作 で すか ら , "85 年 5 月 号 に 掲載 され 
た 保存 版 「 ニ モニ ッ ク ・ マ シン 語 対 応 表 」 
な ど を よく 見 て , 早く 覚え て くだ さい . W 
めのう ち は , 対応 表 を マシ ン 語 の 横 に 置い 


ERG 4 


て プロ グラ ム を 作る よう に すれ ば 良い で し 


233 
で は , 今月 は 16 ビ ッ ト の 転送 命令 に つい 
"Tn" 


51 16 ビ ッ ト 命 令 


ダッ ラク コメ ント 


口 口 の デー タ を へ へ に 転送 


: rr, (nn) の いずれ か . 
On rr, nn, (nn) の いずれ か . 


a て ここ で , 今 まで 出 て きた ペア レジ ス 
タ の な か の 一 つ で ある SP に つい て , その 
働き を 詳し く 見 て み ま し ょ う 

SP は 16 ビ ッ ト の レジ スタ で す が 。 BC や 


IE の よう に 8 き ピ ビッ ト 砂 と ど ジ スタ ЦТ, 
婦 々 に 使う こと は で きま せん 。 つま り SP 
は 汎用 の レジ スタ で は な く , 専用 の レジ ス 
ATOT СШ» DRIER 
た め の 専 用 レジ スタ な の で し ょ Э. 

マシ ン 語 で プロ グラ ム を 作る と き に , も 
っ と レジ スタ が は ほしい 場合 が あり ます . 4 
ん な と き に は ,。 一 時 レジ スタ の 内 用 を メモ 
リ 上 に 退避 さき せ て お く 領 域 を 確保 し て お き 
後 び まだ た データ を 復活 させ る こと が で きま 
4. そし て , この 領域 の 場所 を 示す だ た め の 
レジ スタ が SP( ス タッ ク ・ ポ ポインタ) な の 
TT. 

で は , 表 5 一 7 と 図 1 を 見 な が ら 以 下 の 
説明 を 読ん で くだ る 
す よ うに FEFEFH が 入っ て いる と し ます . 2 
LC, この SP( ス タッ ク ・ ポ イン タタ ) の 示す 
アデ アド レス の メモ リ 上 に , 同じ 〈 表 4 で 示 
すべ ペア レジ スタ の AF. BC, DE-HE.TIX,.IY 
の 各 レ ジス タ の 内 容 を , 順に 転送 する こと 
を 考え て み ま す . 

簡単 に 考え て みる と , 
表わす こと が で て S b oi 
LD (SP), AF 
LD (SP), BC 
LD (SP), DE 
LD (SP), HL 
LD (SP), IX 
LD (SP), IY 

し か し 。 実際 に は 上 の 6 つの ニモ ニッ ク 
は 実在 し ませ ん . これ は ニモ ニッ ク の 表記 
が 違う の で す 。 実際 に は 次 の よう に 表わし 


ыл ОТЕ 9101 


い . 今 SP に は 表 5 に 示 


Брен シ а) E い い $ +. PUSH 
命令 の うち IX, IY の ペア レジ スタ を 使う 
も の は 命令 長 が 2 バイ ト で ,。 その 他 は 1 ババ 
イト 命令 で す . 

を し て , この PUSH t жо) š (^7 v 
ジス タ へ SP の 示す アド レス の 内 容 を 転送 す 
る ) を する の が POP( ポ ボップ グ ) 命 令 で す . < 
の POP 命 令 に も 6 種類 の も の が あり , аф 
令 長 も PUSH 同様 , IX, IY を 使う と き が 
2 バイ ト 命 令 に な り , その 他 は 1 バイ ト 命 
И 27. 

ITEHIA, ここ で 1 つ 疑 問 点 が 出 て き 
ませ ん か ? job RAE, 次 の よう な 順番 で 
命令 を 実行 し た 場合 で す 
@LD (SP) BC っ PUSH BC 
OLD (SP), DE っ PUSH DE 
Өг) DE, (SP) っ POP DE 
OLD BC, (SP) 9 РОР ВС 

まず , で BC レジ スタ の 1234H か が SP の 
内 容 で 示 き る きれ る FFFFH か ら の メモ リ に 転 
送る きれ ます . ZITRU, ⑧9 の 命令 を 実行 
する t, 前 回 せっ か くく 転送 し た 値 が が DE レ 
ジス タ の 内 容 に 置き 変わ っ て し まう の で し 
ょ うか ? 

答え を は NO/ です . なぜなら, PUSH 
令 を 実行 する と SP の 内 容 一 1 の 値 が 示す 
アド レス 上 の メモ リ に ,。 ペア レジ スタ の 上 
位 レ ジス タ の 内 容 が 転送 きれ , 次 に まだ 
SP— 1 (つま り 最 初 に SP に 入っ て いた 値 
ー2) の メモ リ に 下位 レジ スタ の 内 容 が 転 
送る きれ ます . 

iz, その と き SP の 値 は 命令 実行 前 の 
値 か ら 2 を 引い だ 値 に な っ て いま す . この 
22%, 続け て PUSH し て も 初め に PUSH 
し た 内容 が 消 る れる こと は あり ませ ん . 

これ と は 反対 に POP 命 令 で は , SP の 内 
容 は 2 を 加え だ 値 に な っ て いき ます . し た 
が っ て 坦 一 ⑱ を 実行 する と , BC, DEO Ë 
ちら の レジ スタ の 内 容 も 変化 し ませ ん . 


i. その た だめ , W と の 命令 の 順番 を 逆 に す 
ト の 即 値 て アデ ドレ ス を 指定 する t O) C, PUSH AF る と , BCEDE の レジ スタ の 内 容 を 交換 す 
全 た た る ペデ レジ スタ は 。 BUDE HL PUSH BC bocLa E у А 
SP, IX, IYO6 52:55, さら に この 命 PUSH DE 
令 の 場合 に は , 転送 元 が (nn) の 場合 と 転送 PUSH HL 
先 が (nn) の 場合 が ある の で , 全部 で 表 4 に PUSH IX 
示す 12 個 の 組み 合わ せ が あ り ま す . PUSH IY 
ペア レジ スタ の 内 容 を , SP( ス タッ ク ・* 
Q (O) Q (O) фы 号 PiO 伝 言 板 の LA トゥ ルー」 さ ん へ . 普通 の 女の子 の 絵 と ロリ コ ا‎ а © ЗЕ Оо う 風 に 違う の で し ょ ー か . 教え て くだ 
© © さい. PS. ТИОНОУ hwy 8A^. あな た だ た は, その PENNAME か ら 考 える に , あの 故 「 か が み 朋 あき ら 」 先生 の ファ ン だ っ た だ の で は 


| な いで し ょ うか ? 私 も 彼 の 作品 は 好き で す . 9 月 号 の 発売 日 (8 月 8H) は か が み JUEO BC. 先生 の ご 冥福 を 祈っ て 黙 と う …. 
(気分 は の 一 まる な Long Ago.) 


図 1 プロ グラ ム と PUSH, POP の 対応 表 2 ペア レジ スタ 間 表 5 レジ スタ の 内 容 (実行 前 ) 


LD 
LD SP, IX 
LD SP, IY 


組み 合わ せ 


次 の 命令 を 実行 する と , 各 ペ デア レジ スタ 
と メモ リ の 内 容 は どう な る で し ょ うか ? 
な お , SP の 初期 値 は EFFEH で す . 
LD BC, 0123H 
LD DE, 4567H 
LD HL, 89ABH 


BC, (nn) 
PUSH BC (r DE, (nn) 
PUSH DE Len: HL, (nn) 
PUSH HL S п SP, (nn) 
POP BC п) IX, (nn) 
| Ү<-(пп) IY, (nn) 
POP DE B (nn), BC 
POP HL (ni —DE (nn), DE 
LD (EFFEH), BC ! Т * HL (nn), HL 


(nn), SP 
(nn), IX 


42 16 ビ ッ ト 転 送 命令 群 03 PUSH BC を 実行 し た と き 


実行 前 の SP が 示す アド レス 


実行 後 の SP が 示す アド レス 


実行 後 の SP が 示す アド レス 


行 前 の SP が 示す アド レス 


編集 部 より 


.6 月 号 よ り 読者 の 皆様 か ら 御 要望 の 多 か だ さい . [P| 
っ た , "“Z80 マ シン 語 講 座 " が 始ま り ま し た . 
この コー ナー で は マシ ン 語 に 興味 の ある 
方 や , これ か ら マ シン 語 で ゲー ム を 作っ て 
みた いと 思っ て いる 方 々 に , マシ ン 語 に つ 
いて の 初歩 か ら を 説明 し て いき た いと 思い 
ます . そこ で , この コー ナー に 対す る ご 意 
見 ・ ご 希望 な ど を ハガキ に 書い て , ど し ど 
し PiO 編 集 部 まで 送っ て くだ さい . 
ま た, 毎月 の 宿題 の 解答 な ども 送っ て く 
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Z80 マ シン 語 講座 に つい て 


DSG 


ご こめ ん な さい / 10 進 数 の 256 は 。 2 ЖЕ 
数 で は 10000000 で は な く て 100000000 と ゼ 
ロ が 1 つ 足 り ま せん で し た だ . ERROR'853 
ん , 申し わけ あり ませ ん が も う 一 度 悩 ん で 
СРБИ 

8 HID 2 進数 や 2 桁 の 16 進 数 (8 ビッ ト ) 
で は , 10 進 数 の 0 一 255 ま で の 数 値 し か 表現 
С аж wA. て すか りら.255 よ うり 大全 な 数 
値 (た と えば 256) を 表現 し よう と する と 
桁 数 が 増え る わけ で す (256 な ら ば 1 Ні 
А 9). 

き て , Н, N72Z iX, DAARS (10 
進 補正 命令 ) が 実行 きれ だ と き に だ け 
CPU が 見 る フラ グ で , プロ グラ マー が 気 
に する 必要 は あり ませ ん . 

簡単 に 説明 する と, H フ ラグ は ハー フ ・ 
キャ リー フラ グ と いっ て , 第 3 ビッ ト か ら 
第 4 ビッ ト へ の 繰り 上 げ や 桁 漠 りな ど を 記 
ELIT. まだ た N フ ラグ は 減算 フラ グ と い 
っ て , 直前 に 行なわ れ た 演算 が ひき 算 だ っ 
た の か 足し 算 ど っ た の か を 記憶 し ます . 

Н, N フ ラグ や DAA 命 令 に つい て は , 
これ か ら の Z80 マ シン 語 講座 で も 説明 され 


Libor арж U с 
а ДЪ 


N66SR モ ー ド と 他 の モー ド に つい て 


(K.W) 


愛知 県 


OJO a^ 


BASIC プ ログ ラム は 普通 , 中 間 コ ー ド 
に 変換 きれ , メモ リ 内 に 格納 る れ て いま す . 
N66SR モ ー ド と 他 の モー ド で は , だ ぶん 
この 中 間 コ ー ド が 違う の で し ょ う 

も し 。 N66SKRK モ ー ド で 入力 じ だ デブ ログ 
ラム を 他 の モー ド で ロー ド し だ い の な S; 
ディ スク を 持っ て いれ ば ASCII モ セー する 
こと て 問題 は 解決 し ます (テー プ 版 で は 
АСИЕТ ませ ん )。 


ZEPLIS を や り た いよ ー 


p 結論 か 6 ê 5 う と ,“ZEPLIS/II" は MZ- 
1500 で も 動き ます . た だ だ, 動作 が お か し い 
Wr231, 2 箇所 あり まし だ た だ. 
最上 上段 で 止ま っ だ た まま の 敵 が いる 
@ の その 敵 を や っ つけ る こと が で きだ な い 
⑯ 別 の 敵 が で て くる と, その 敵 を 消す こと 
が ある 
の 3 x+. MZ-700/1200-80K/C C E 
うな る か わか り ま せん の で , も し か する と 
この ゲー ム 本 来 の バグ か も し れ ま せん . 
MZ-700 で 動く プロ グラ ム は , だ いだい 
MZ-1500 で も 動く を う で す . で す が , Ян 
集 部 で は “この 機種 で 動く も の は あの 機種 
で も 動く が " と いう チェ ッ ク ま で や っ て い 
5Wx23g000 C3. で すか ら , タイ トル に 
ある 機種 は ほとん ど 作 者 の 投稿 原稿 の と お 
りな の で す . K.W) 


F308557/224»25? 


と また また ご めん な さい /「Z80 マ シン 語 
入門 」 の 本 に 間違い が あり まし た . EU 
の CALL M,nn と いう 命令 は , マシ ン 語 に 
TCE EEO O NOCT: 

それ と 「D3」 の 命令 に つい て で す が , 
これ 汰 な 159 た に 款 っ て いま す 、 し が C,) p 
160 の マシ ン 語 表 に は 載っ て いな い の で ち 


ょ っ と わか り に く か っ だ か も し れ ま せん ね . 


ご めん な さい . 

な お, IN A,(m) と いう 命令 も 表 の 中 に 
あり ませ ん で し た だ. こち ら の 方 の マシ ン 語 
2 'DB;T3j. (K.W) 


大 宮 市 山崎 り 子 


東京 都 Mick 


00SR の ディ スク に つい て 


р SR の 1DD の ディ スク は , 1D の ディ スク 
の 読み 書き が で きま す . で すか ら , ID 
の ディ スク を 取り 付け る 必要 は あり ま л, 
L, 取り 付け な く て も ソフ ト は 動き ます . 
ТЕЛ? Cr -EIDDOT AA ググ で な 
を 立ち 上 げ る と , 1D へ の 読み 書き が で き 
な く な り ま す 「1D で 立ち 上 げ て も 1DD へ の 
読み 書き が で き な く な る ). そ うい うと き は 
リセ モッ ト ・ ボ タン を 押す か , 電源 を 入れ 直 
(K.W) 


に し て Sk s 9 Й 


デバ イス ・ エ ラー ガ が 発生 


ディ スク で Device I/O Error が 出る な 
ЕМЕ К 00 6 

考え られ る の は ドラ イブ の 故障 で す DF, 
ディ スケ ッ ト が 壊れ た 場合 に も 発生 する よ 
ライ で 3.. £1! DISK BASIC EEE) 
理由 で 壊れ て し まっ た 場合 も 考え られ ます . 

Š う 一 度 シ ステ ム ・ デ イィ スク で 立ち 上 げ 
て 正確 に ロー ド し て みて くだ さき さい 。 も し 他 
の デ ロ グ ラム が ロー ド で き て “PIERO^" 
だ けが ロー ド で き な い の な ら 6, その ディ ス 
ケッ ト が 壊れ て いま す . 新しい ディ ス 
ケッ ト を フラ ォ ー マ ッ ト し て か ら セ ー プ と し て 
くだ さい (K.S) 


FM キー に つい て 


— WS SN 
名 古屋 YANMO 


7 月 号 の PRG を 作ろ うと し て る PAL さ A. ダメ ー ジ の 計算 方 法 は 。 キャ ラク ター 人 一 人 に 体力 点 と 技術 点 を 決め て お な おき ます. そし て 戦う と 
š, 自分 の 敵 と それ ぞ れ 技術 点 十 乱数 し ます . それ が 敵 よ り 大 きい と き は , その 差 の 分 , ар eig と いい の で す . この 方 法 な ら 6 


「 剣 を 拾っ た あ 」 と か の と きも , 技術 点 に プラ ス で 強く な る の で すか ら , と 一 っ て も 便利 で す よ / . 突然 ピオ の 絶 力 に と りつ か れ だ た だ 。 


eA た っ ちゃ ん で す 。 これ か ら も, 皆さん よろ し くね ノ 


(た っ ちゃ ん ) 


РАІ は っ きり 人 言 
ゲー ム に は この よう な 問題 は な いと 思い ま 
す が …. 


た だ たとえば, キー 割り 込み を 利用 する 方 法 
が あり ます . FM-8 以 外 の 機種 で は , IRQ 
割り 込み を メイ ン CPU で 受け る こと が で 
きま す (FD02H に 1 を セッ ト す る ). 

そし て 割り 込み ルー チン を 作成 し て その 
エン トリ ー ア ドレ ス を FFEF8, F9HUCÉ€ 
き 込 ん で な おけ ば キー が 押さ る れ だ 時 点 で その 
ルー チン が 動き 始め ます . 

を そこ で この 割り 込み ルケ ルー チン で , Жай 
だ キー が その ゲー ム で 使わ れる も の で あれ 
ば , その キー 専用 の フラ グ を ON に する わ 
UX 1. 

後 は メイ ン ・ ル ー チ ン で それ ぞ れ の フラ 
グ を 調べ て 処理 し て いけ ば , 1 回 の ルー 
の 間 に い くつ キー が 押さ る れ よ うと O.K. で 
+. た だ し フラ グ は 調べ た 直後 に クリ ア し 
な けれ ば な り ま せん . 

ちょ っ と 難し い 方 法 で す が , 
確実 だ どろ うと 思い ます . 

A2, 中 に は カセ ッ ト 販 売る され て いる ゲ 
ー ム も あり ます . 詳し く は PiO, I/O の 広 
py СС CR (K.S) 


faf w- Tacol £ aperus 
Eeäsnarc- бо) …。 mk る 5 ま ど い い 


これ が 一 番 


あー ん FM-7 ほ し - ょ ー 2 
Атча _ 


Са: - この 者 は . 
/ BE абыз» 


BTM-  ttua|spko 


Ri. 


岡山 市 西荻 貴子 


カセ ッ ト ・ テ ー ブ の 行方 は や 


PAL 私 が 管理 し て いる 訳 で は な い の で 
良く は わか り ま せん が , 編集 部 の 倉庫 を 見 
れ ば 納得 で どき る で し ょ う . 正 に 資料 の 山 , 
作品 の 山 で す . それ か ら , “遊ん で いる "の 
で は な く ( そ の 通り だ っ た だり し て ……), “評価 
し て いる “の で す : ER. は そん な に 忠 じ ゃ 
あり ませ ん よ . 

A2. 私 も 電話 番 を や り ま す が , や は り 
ライ 。 1I/O 編 集 部 で す 」 と 言い ます . だ 
だ し , 相手 の 人 が 「 あ の う , PiO じ ゃ な い 


っ て 作れ ます . 最近 の 


納 す る 際 , 
対応 し た 数 字 (コー ド ) 


ん で すか ?」 な ど と 聞い て くる と き に は 
Гг, そちら も 受け て いま す 」 と 言い ま 
す . じかに 編集 部 を 見 せら れれ ば わか り 
ix, 1/O 編 と PiO 編 は 同じ 室内 で 仕事 
を し て いま す . その だ め に か , 外部 か ら の 
電話 に は 兄貴 分 で ある 1/ 〇 と し て 受け て い 
る よう で す . 少な く と も 電話 相談 室 で は 標 
準 で す . で すか ら , PiO 編 に 電話 が な い 訳 
で は あり ませ ん . (T.K) 


PB-200 に つい て 


PAL A2. まとめ て ち ぉ 答え し まし ょ う 
PB-100 と PB-200 は RAM 容 量 が 違う だ け 
で すか ら , PB-100 に RAM ン パッ ク を 加え れ 
ば それ は も う PB-200 と まっ た だ た く 同 じ に な 
る 訳 で す . すなわち , 心配 する こと は 何 も 
な いと に みあ まな りり ます 。 

A3. 工学 社 刊 で 言い ます と , PB-100 の ゲ 
ー ム は ШОЙ 270275 А 62° —– 
ム 」 の |2 | と |3| が あり ます . 値段 は それ ぞ 
れ 1.200 円 と 1,500 円 で す . 無論 , PB-200 
で 充分 に 楽し め ゅ ます . (T.K) 


長い 行 の 入力 方 法 


読者 の 皆さん の 中 に は 質問 の 意味 が わか 


ら な い 人 の 方 が 多い で し ょ うか ら ,。 ここ で 
ЕИМЕЗТЕРЕСОЛӘЗЗ?. “ご リ スキ 
通り に プロ グラ ム を 打ち 込ん で いっ だ が , 
途中 で 打 て な く な っ て し まっ た . どう し た 
ら 残 っ て いる プロ グラ ム が 打ち 込め る の だ 
55» 

る て , BASIC ゲロ グラ ム を メモ リム へ 格 
文字 の 1 つ 1 つ は すべ で て それ に 
に 変換 る れ ま す . 
EX 

[PRINT] [50・52・49・ 4 Е: 54], 
と いう 16 進 デー タ に 変換 され る 訳 で す . と 
ころ で , 普通 上 記 の PRINT や INPUT 等 の 
命令 語 ( 含 関数 名 ) は , メモ リ の 節約 や 実行 
速度 の 向上 の た だ ため, 1 一 2 バイ ト の 数 に 変 
換 き る きれ ます . だ た と えば ば, 

[PRINT] 一 [DE] (PC-1350 の 場合 ) と 
な る で の sn だ で て す 、 niat. | 本来 な 
ら ば 5 バイ ト 分 の と ころ を 1 バイ ト で 済ま 
せ て いる 訳 で す 。 

質問 の 答え です が, 説明 書 に も 書い に て あ 
る よう に 。 PC-1350 は 一 度 に 入力 で きる 文 


字数 は | ENTER | を 含め て 80 バ イト 分 で す . 


C126, 長い リス ト だ と 一 度 に は 入り き 


ら な い の で す . 

L ころ が を こ て | ENTER | を 押し て く 
785, カー ソル を 入り きら な か っ だ と こ 
ろ ま で 持っ て いく と あら 不思議 , 余裕 が で 
き て いる ハズ で す . それ は , | ENTER | を 
押す こと に よっ て 命令 語 が それ 専用 の コー 
ド へ 変換 きれ て し まう か ら で す . つま り は , 
PRINT を 5 バイ ト と し て いた も の が 1 
イト に な っ た だ の で , 余裕 が で きた 訳 で す . 
su t CO Tp s £6 Ж 
きら な か っ た ら . 一 度 | ENTER | を 押し て 
か ら 再度 入れ て くだ きる さい" と いう こと な の 
С. (T.K) 


マシ ン 語 入力 ツー ル に つい て 


Ы 「 入 力 ツ ー ル 」 の 方 は , 250 行 の 

250: DATA 478, &5F, &46, &79--- 

t, 

250: DATA 4&78, 

EHEC COS] 
それ か ら 「 チ ェ ッ クサ ム 」 の 方 で す が 


= Қ? イト Ышы 


これ に 関す る バグ 指摘 は 今 の と こ 
す . 


ろ 皆 無 で 


お わび こと 訂正 


8 月 号 の 相談 室 に お きま し て , シャ ー プ 
(株 ) の ポケ ッ ト コ ンピュータ PC-1261 等 の | 
メモ リ 増 設 に つい て の 質問 に 対し 。 サービ 
Z ` セン ター に て 受け 付け て いた だ ける よ 
うな 解説 を し まし た が , 現在 PC-1250 か ら 
PC- 1251 へ の 改造 は , Ж) Ұ9,000 4 5 от 
な っ て いま す が , その 他 の 機種 に つい て は 

費用 が 高額 に な っ て し まう た め 。 改造 は 行 
2 な か っ て いな いと の こと て す 

な お , 8 月 号 の 記事 に より PiO 読 者 な ら 
ペイ ペク ンク несе 

いた だ しま した. 誌面 を がり て ぢ お詫び 申し 上 

т, [р] 
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PC-6001/mKII 用 (PO モ = タ ) 


この モニ タ は PC-6001 と mkII お よび 6601 
DEET ОЕ СЕКЕ EY. だ だ し 。 
"Haw Many Files" の 指定 が ある 場合 は 2 
ХАТА; 

リス ト 1 を 打ち 込ん で RUN& る せ て くだ さる 
v. 多少 間 を 置い て “ОК” と 出 ま す . この 
モニ タ は すべ て 機械 語 で , 領域 は EE00 一 F 
2A8 番 地 で す . 起動 は EXEC & HEEO00 C 3; 


BASIC に 戻る 
メモ リ ・ ダ ンプ & 縦 横 サ ム 表 示 
(09000, 903F [RETURN |) 
ボー レー ト を 1200 ボ ー に する 
ボー レー ト を 600 ボ ー に する 

プリ ンタ 出力 ON/OFF 


Я ジャ ンプ 
各 コ ユマ ンド は 家 1 の と お り で す ( 
3 GE200 | RETURN |) 
メス モリ 内 容 を 書き 換え る 場合 , この モニ セー プ 
タダ で は 2 と お り の 方 法 が あり ます . 一 つ は , (59000, AEFF, HN RETURN | 
"。・ を 使っ た 書き 込み で アド レス と 書き 込 ロー ド 


みた い デ ー タ を “: "で 区 切っ て 入力 すれ ば 
メモ リ に デー タタ が 入り ます . 
£j C000 番 地 か ら “ED"。 "B0" と 入れ 
る C000: ED, ,|В0(“ "は 空白 ) 
まだ D コ マン ド で 表示 され た だ 内 容 を スク リ 


メモ リ 書 き 込 み 
(9000 : 12 ご,34 | RETURN |) 


セッ トメ モリ ・ モ ー ド 
(A000 : | RETURN | ) 
nnnn, mmmm は 16 進 数 ,.ff は ファ イル ・ ネ ー ム (2 文字 ま 


Jr. 用 チェ ッ ク ・ サ ム ・ ブ ログ ラム 


dr. 用 の チェ ッ ルク ぃ サム に ブロ ゲタ ム kk. 
RS バイ ト 単 位 の 合計 , 1 ブロ ッ ク 128 バ 
イト 単位 の 合計 を チェ ッ ク ・ サ ム と し て 婦 ダ 
フク る ゲロ ゲラ な で す 、. 

ーブログ ラム 多 実 行 し 。 Р SR 
p: ЖӘЕ А E 8 А 


ー ン ・ エ ディ イッ ト す る こと も で きま す -。 も с) コマ ンド , パラ メー タ と も 小 廊 字 で も 可 “ こ “は ス 


うー-- つ は セッ トメ モリ ・ モ ー ド で 。 - 
を 使う と ダン プ ・ リ スト も 楽に 打ち 込む こ 
Lec d. 
例 D000 番 地 か ら マ シン 語 リ スト を 打 
ち 込 む 0000; 
"に 続け て [RETURN| キー を 押す と , 2 
の モー ドド "に 入り ます : 後 は マジ シン 語 リ スト 


ベー ス 1 個 分 あけ る . 
各 チ ェ ッ ク ・ サ ム プロ グラ ム 掲 載 号 
掲載 号 | 次 回 掲載 予定 


"85 年 9 月 号 | 86 年 2 月 号 


プリ ンタ に プ ブロック 単位 の メモ リ ・ ダ ンジ 95 年 5 月 号 | 85 年 10 月 号 
LA Uu Toro. WLEYIBAELS$T, X 
ドレ ス は “$”" を 付け ず に 16 進 数 で 入力 し て 
くだ きい . 4 桁 以 上 入力 し た 場合 。 右端 か 
ら 4 放 字 が 有効 と な り ま す . 

出力 先 を CRT に する 場合 は 廊 番 号 70, 90, 
1030 の “PRINT # VO BH: ERS OR 
だ さい . 


を ひだ すら 入力 し て くだ きい.。 8 バイト 入 
力 す る と 自動 的 に チェ ッ ク ・ サ ム を 表わし 
( 横 サ ム の み ), 次 の 行 に 移り ます . 間違え 
て 入力 し だ と き は [に を 押し て くだ きい 。 ま 
だ た この 番地 を を スキップ させ だ た いと き に は 円 | 
を 使っ て くだ さる さい. この モー ド を 抜け る の 
i [STOP] キー で す . 

な お テー ブー ド フ ォ ー マ з К 人 は 6.。82 年 2 
月 号 の モニ タ や PB ヂ iO 2 号 の EE モニ タ と 万 換 性 


リス ト 1 Jr. 用 チェ ッ ク ・ サ ム ・ プ ログ ラム リス ト 


85 年 6 月 号 | '85 年 11 月 号 


855 7 月 号 | "85 年 12 月 号 


'85# 8 月 号 | "86 年 1 AS 


LET PzXS:GOSUB 5000 

LET Р=Х6: GUSUE 5000 

LET PzX4:GOSUB 5000 

LET PzX2:GOSUB 5000 

X$-X$-" ":RETURN 

LET X$zX$-*MID$ (H$,P*1,1) : RETURN 


10 LET H$-"0123456789ABCDEF " 

20 INPUT "START ADDRESS",S$:LET S-VAL("$ 
"-RIGHT$(S$,4)) 

50 INPUT " END ADDRESS" ,E$:LET E=VAL ("$ 
"^«RIGHT$ (E$,4)) i 

40 LET S2-0:FOR I=@ TO 15:LET S1=0: GOSUB 
2000 

50 LET D$-X$:FO0R J= の TO 7:LET D-PEEK(S*J 
)YLET 8S1=S1+D:LET X-D:GOSUB 1000 

6 の LET D$-D$-X$:NEXT J:LET X-81:GOSUB 20 
の の 

70 LET D$-D$-"--":PRINT 4,D$; X$:LET 52-5 
2181:LET S-8*8:NEXT I 


9 の PRINT %," CHECK SUM :";X$:PRINT W,PRI 
NT #, 

100 IF S>E THEN GOTO 40 

110 END 

1 の の の LET X1=INT(X/16) :LET X2-X-X1*16:X$- 
1010 LET P-X1:GOSUB 5000 
1020 LET P-X2:GOSUB 5000 
1050 LET X$-X$«" "RETURN 

2000 LET X12INT(X/16):LET X2-X-X1*16 
2010 LET X う =INT(X1/16) :LET X4=X1-X3*16 
2020 LET X5=INT(X3/16) :LET X6=X ミ ーX5*16s し 


ІЛ АК2 PC-6001/mkII 用 PiO モ ニタ 


OOTO&HF 268: READD ま も : POKEA , VAL ( "$H" +D$) : NEXT 


DATAAF , さ 2 。 AD 。F2 。 さ E 。 ビ 3 。 さ 2 。 9 さ 。FF 。21 。9F ,F1,22,94,FF , AF 
DATA22,58,FA,3E,2A4,CD,C7,26,CD,F9,28,11,DA,FE, 1 。FE 
DATA24,20,01,13,D5,CD,OA,F2,1A,FE, 3B,CA,87,EF,FE,3A 
DATA20,29,C1,22,49,F2,12,14,B7,28,15,CD,F8,F1,28,10 
DATAES,CD,OA,F2,45,E1,70,10,FE,30,28,04,13,23,18,E7 
DATASE,1E,CD,C7,26,CD,51,F2,C2,18,EE,D1,21,84, EE, 10 
DATAB7 。 CA 。96 。FO 。 1 。 CD 。21 。F2 。 BE 。 2B 。 12 。 7E 。 B7,28,05,23 
DATA22,23,18,F0,21,A5,F1,CD,CF,30,C3,9F,F1,12,253,4E 
DATA23,45,C5,C9,42,C2,F0,44,CE,F0,32,81,F1,35,85,F1 


DATAF2,C2,93,EF,24,B7,F2,22,49,F2,11,F8,FF,19,22,B7 
БАТАҒ2,2Е,07,22,В9,Ғ2,ЗЕ,Ор,Ср,С7,26,Ср,51,Ғ2,С2,92 


DATAEF,2A,B9,F2,3C,FE,08,28,06,32,B9,F2,C3,9Z2,EF ,20. 


DATAB7,F2,22,09,F2,11,08,00,19,22,B7,F2,0F ,32,B9,F2 
DATA18,D4,20,B7,F2,22,49,F2,11,F8,FF,19,22,B7,F2,3E 
DATAOD,CD,C7,26,CD,51,F2,CZ,93,EF, 2A, B7,F2,22,A9,F2 
БАТА11,08,00,18,Е6,5Е,Ор,Ср,С7,26,2А,В7,Ғ2,22,89,Ғ2 


5 рАТАСр,51,Ғ2,С3,ОҒ,ЕЕ,Ср,51,Ғ2,С2,ОҒ,ЕЕ,2А,В7,Ғ2,Ср 


DATACA,F1,3E,3B,CD,C7,26,34,B9,F2,3C,47,7E,23,CD,ES 
DATAF1,2E,20,CD,C7,26,10,F4,06,02,2E,1D,CD,C7,26,10 


5 DATAFB,C9,23E,C9,22,93,FF,ED,7B, SB,F0,C2,42,04, 15, B7 


DATACA,96,F0,30,0D,F2,22,58,FA,CD,OA,F2,22,09,F2,1A 
DATAB7,CA,96,F0,12,CD,008,F2,22,0B,F2,3E, 10,32, BA,F2 
DATACD,20,F1,CD,51,F2,21,BA,F2,35,CC, 1E,F1,CD,37,F2 


105 DATA50,8C,F1,47,97,F1,52,9D,EE, AC, OE,EF ,00,1A4, B7,CA DATAFE , 0 さ , CA, OF 。 EE , 2 。 9 。F2 。ED 。 SB, AB,F2,CD,99,F2,28 
115 DATAOF,EE,CD,OA,F2,22,BO0,F2,14,B7,CA, OF ,EE, 1 ミ 。CD , OA DATAE2,38,E0,3A4,BA,F2,FE,10,CA, ZE,F1,CZ,OF,EE,CD,3E 
125 DATAF2,D5,ED,S5B,BO,F2,B7,ED,52,22,D1,22,B2,F2,1A,B7 DATAF1,CD,24,F1,3E,10,22,BA,F2,C9,C5,D5,E5,01,07,00 
135 DATA28,01,12,21,B4,F2,10,77,13,23,10,77,23,36,00,CD DATA11,BC,F2,21,BB,F2,56,00,ED,BO,E1,D1,C1,C9,C5,D5 
145 DATAA8,25,06,05,3E,AF,CD,CC,15,10,F9,21,BO,F2,05,06 DATAES,06,1F,3E,2D,CD,C7,26,10,FB,CD,2C,F2,21,7C,F1 
155 DATA7E,CD,CC,14,23,10,F9,CD,06,1B,CD,48,25,1E,00,2A4 DATACD,CF,Z0,21,BB,F2,05,08,0E,00,3E,20,CD,C7,26,7E 
165 DATABO,F2,ED,4B,B2,F2,56,7B,82,5F ,75,CD,CC, 10,22, OB DATA81,4F,7E,CD,ES,F1,22,10,F1,3E,34,CD,C7,26,79,CD 
175 БАТА78,В1,20,Ғ2,7В,Ср,СС,14,Ср,06,1В,С3,ОҒ,ЕЕ,Ср,9А DATAES,F1,CD,2C,F2,CD,2C,F2,E1,D1,C1,C9,53,75,6D, 3A 
185 DATA25,06,05,CD,70,14,FE,0F,20,F7,10,F7,21,B0,F2,065 DATAOO,3E,01,18,01,A0F,22,1F,FA,C3,0F,EE, 3A, AD 。F2 。 EE 
195 БАТАО6,Ср,70,14,77,25,10,Ғ9,56,00,Ср,АА,14,21,С2,Ғ1 DATAO1,22,A4D,F2,CZ,O0F,EE,ED,7B,5B,FA,CD,OA,F2,E9,CD 
205 DATACD,CF,20,21,B4,F2,CD,CF,30,CD,2C,F2,20,BO,F2,CD DATA2C,F2,C2,00,EE,49,4E,56,41,4C,49,44,20,42, 4F , 4D 
215 DATACA,F1,3E,2C,CD,C7,26,2A,BO,F2,ED,SB,B2,F2,19,2B DATA4D,41,4E,44,07,00,42,2D,52,55,4D,20,45,52,52,4F 
225 DATACD,CA,F1,CD,2C,F2,CD,94,25,24, BO,F2, ED, 4B,B2,F2 DATA52,07,00,46,4F,55,4E,44,30,00,F5,7C,CD,ES,F1,7D 
235 DATA1E,00,CD,70,14,57,823,5F,72,23,0B,78,B1,20,F5,CD 5 DATACD,ES,F1,F1,C9,F5,E6,0F,C6,20,FE,34,28,02,C5,07 
245 DATA70,1A4,BB,28,0C,CD,44,15,21,B6,F1,CD,CF,30,CZ,9F DATACD,C7,26,F1,C9,C5,F5,47,E6,FO, OF, OF, OF , OF ,CD,DS 
255 DATAF1,CD,44,1A4,C3,0F,EE,22,B7,F2,AF ,32,B9,F2, 3E, 1E DATAF1,78,CD,DS,F1,F1,C1,C9,FE,20,D8,FE,24,38,05,FE 
265 DATACD,C7,26,2E,0D,CD,C7,26,CD, 9C,FO,CD,C4, OF ,CD,21 DATA41,D8,D6,07,D6,30,FE,11,2F,C9,21,00,00,14,CD,21 
275 DATAF2,FE,02,CA,85,F0,47,FS,CD,F8,F1,38,55,D1,4F ,78 DATAF2,CD,F8,F1,28,09,29,29,29,29,B5,6F , 13, 18,EE, 1A 
285 DATACD,C7,26,CB,01,CB,01,CB,01,CB,O1,CD,C4, OF ,CD,21 DATAC9,FE,61,38,06,FE,7B,30,02,D6,20,C9, 3E , 0D,CD,C7 
295 DATAF2,FE,03,CA,85,F0,47,CD,F8,F1,28,C7,B1,F5,20,B7 DATA26,3E,04,CD,C7,26,C9,26,18,FA4,B7,C8,C5,47,CD, BC 
る 05 DATAF2,2A4,B9,F2,5F,16,00,19,F1,77,1C,7B,FE,08,28,006 DATAOF,A8F,232,18,F5,78,C1,FE, 1B,CO, CD, BC, OF,28,FB,18 
315 БАТАЗ2,В9,Ғ2,С2,92,ЕҒ,2А,В7,Ғ2,22,89,Ғ2,11,08,00,19 DATAE6,24,49,F2,CD,CA,F1,0E,00,05,07, 3E, 3A,CD,C7,26 
325 DATA22,B7,F2,0F,22,B9,F2,2E,0D,CD,C7,26,CD,51,F2,CZ DATA11,BB,F2,7E,F5,C5,4F,15,81,12,C1,F1,CD,ES5,F1,81 
335 DATA93,EF,F1,FE,1D,28,10,FE, 10,28, 26,FE, 1E,28,52,FE DATA4F,3E,20,CD,C7,25,22,12,10,E9,7E,F5,C5,4F , 14,81 
245 DATA1F,CA,7A,FO,CZ2,92,EF,234,B9,F2,B7,28,07,ZD,22,B9 DATA12,C1,F1,CD,E5,F1,81,4F,22,22,49,F2,3E, SA,CD,C7 


DATA26,79,CD,ES,F1,CD,2C,F2,C9,E5,B7,ED,52,E1,C9,42 
5 DATA79,20,C5,B5,D4,20,CB,DB, B7 


ー の か / と に か く 最 近 の PiO は こ 一 いう 奴 が 増え て いる な . や い ド タン クノ 文 旬 が ある な らい つ で も 来い / -Жей, 生駒 じゅ ん いち , 
Nakkey の 3 人 が 相手 に な っ て や る . Nakkey も 怒っ て だ か ら な …. お 前 に 人 の 事 を いう 権利 は な いひ はず だ . わか っ だ か / と いう 事 で し だ た だ. 
(一 条 交 乱 & を 生駒 じゅ ん いち &Nakkey 連 合 軍 . ノ ) 


KO О) š P 8 月 号 の ド タ ン ク へ .。 何 が ロリ コン だ …. 何 が や め ゆめ ろだ / ЛА: Бо そ 一 ゆー お 前 は イラ スト の イ の 字 も 描 り ね ー ん じゃ ね 
% 


ポリ シー, マイ フロ キヤ ビン , 富士 音響 マイ コン セン ターRAMII さ 
ん の 協力 に より , 抽選 で 13 名 の 読者 の 方 に 下記 の 賞品 を プレ ゼン トレ 


= 応募 要領 


官製 ハガキ に 右 下 の シ ー ル を 貼り , ⑨⑲ 和 〒 住 所 @ 氏 名 9 年 齢 ⑲ 職 業 ま た 
は 学年 ⑧ 希 望 の 賞品 名 称 (下記 で 紹介 し た 賞品 の 中 か ら 1 つ だ け ) を 
ハッ キリ 記入 し て , 9 月 8 日 (消印 有効 ) まで に PiO プ レ ゼ ント ・ コ 
ー ナ ー 宛 に 送っ て くだ さい . な お , 当選 発表 は PiO'85 年 11 月 号 で 行 な 
いま 7. 

+: 応募 シー ル の 貼っ て いな い ハ ガキ は 無効 に な り ま す . 


OWEIRD 2 ӨНАРРҮ FRET| ⑥ELECI LAND 


(ポリ シー) Ұ5,000 (マイ クロ キャ ビン ) Y6,800 (富士 音響 マイ コン セン ターRAM II ) ҰЗ,800 
FM-7/NEW7/77( カ セッ ト 版 ) PC-8001mkIISR/PC-8801/mk II /SR PC-8801 / mkII /SR( カ セッ ト 版 ) 

「 ポ リス の 支配 下 に あり な が ら 正 式 な 宇宙 (ディ スク 版 , 全 機 種 兼 用 ) アキ ハバ ララ ンド は 不思議 な 島 . 電 電池 や 
ポリ ス で な く 。 生命 の 保障 も な い チ ー ム 」 ティ ンタ ー デ ル 城 に は , か つて の 支配 者 , FI, ヘッ ド ホ ン ・ ス テレ オ な ど が 空中 
これ が 移 星人 類 達 に “WEIRD” と 呼ば れ マー ク 王 の 財宝 が 隠 る きれ て いる . 今 ま で に に ぶら きる が っ て いる の で す . この 鳥 に エン 
る 5 人 組 , シー クレ ッ ト ポ リス の 真 の 姿 だ 何人 も の 者 が 探索 に 出かけ た だ た が, 誰 一 人 と クト マン が 電機 製品 を 集め に きだ た の で す 

СС оооу, 
3 名 5 名 
SCORE 005900 KICH 010000 nar: Of SI: 28 


š 


E 
ix xx I oo Т 88 


【 当 選者 発表 】 PiO7 月 号 プ レ ゼ ント ・ コ ユ コー ナー に 。 多数 の 方 々 より ご 応募 いた だ た だき あり が と う ご 
ざい まし た . 抽選 の 結果 , 次 の 13 名 の カ 々 に 賞品 を 送ら せ て いた だ きま す . 


⑯ ぐ る つべ 9HYDLIDE MACH/ 


新潟 県 北魚沼 郡 石川 県 能美 郡 = 兵庫 県 明石 市 
滋賀 県 近江 八幡 市 E Lı YR ê Bk r 千葉 県 松戸 市 
東京 都 日 野市 埼玉 県 上 福岡 市 埼玉 県 加須 市 
北海 道 苫 前 郡 東京 都 足 立 区 
千葉 県 松戸 市 江口 : 東京 都 国 立 市 


SA 
с 5 54 
P 


MSX 用 カー トリ ッ ジ кемш hl 
07 東京 都 港 区 南青山 7-3-6 
っ に -1 0 i VU 0 ы у. рибна ビル 2 で 


胃 昌 本 エレ を よ 有 ミネ クズ より に の と し あせ | ブタ キザ қа дым арафа e VOU UOS dna (代表) 
デオ 等 の 画像 と MSX コ ンピュータ の 画像 て テレ ビ 等 に 出力 する 。 オー ディ オ ・ ビ ジ 

と を 合成 する , スパ ー イ ン ボ ポー ズ ・ カ ー | ュ ユア ル ・ カ ー ト リッ ジ "VC-10" が 発売 さ 

トリ ッ ジ ‘SIO E, オー ディ オ 機 器 等 | れ ま し た . 

の 音 を , オシ ロス コー プ , スペ クト ラム ・ 

(rH 


品番 | 5110 | Vc-10 


MSX 標 準 カー トリ ッ ジ ・ ス ロッ ト MSX 標 準 カー トリ ッ ジ ・ ス ロッ ト 


VIDEO ІМ, AUDIO ІМ 2 ch オー ディ オ ・ ラ イン 入力 , 1 ch マイ ク 入 力 


RF OUT, VIDEO OUT 本 体 よ り シ ン セ サイ ザ 出 力 


19 バハ パサ ザール 


d» PC-6001mk II +PC-60M43+PC-DR 
311+e. すべ て 箱 , 説明 書 , 付属 品 付 
ЖҰТ5КС б. 値 引 可 . 〒 待 ち ま す . 
350-02 坂戸 市 鶴舞 2-29-5 

根本 Ж 


d» PC-8001(32K) + PC8048+ PCG-8100 
( 旧 タ イプ ) += a Tatt ІН 


図書 を \60K ぐ で らい. PC8001 は 箱 な し , 
PC-8048 に 多少 きず あり . 完 動 , 無 改造. 


Tt. 
Ф 503 大 垣 市 恵比寿 町 南 7-1-21 
今井 康博 


d$ PC-6001mk II SR + РС-6082-- PC-6044 

SR (汚れ あり ) を \75K 以 上 . TT. 

® 215 川崎 市 麻生 区 2-12-20 
玉虫 正 次 郎 16% 


まま PB-200( キ ズ ナ シ , 完 動 ) 十 付属 品 十 
図書 2 冊 を \10K. また PC1250 シ リー 
ズ と の 交換 も 可 (送料 こち ら 6 持ち ). な る 
べく 早く W〒 で . 
т 324 大 田原 市 上 奥沢 368 

寺本 直也 14 


d X1C--CZ- 8 VC(1 箇月 使用 ) キ + マニ 
ュ ア ルキ + 付属 品 を \70~80K. TEL を 書 
CWT 
4? 637-15 
栗栖 広 也 


吉野 郡 十津川 村山 手 


d» PC-8001mk II (漢字 ROM 付 ) を ぎ \48 一 
50K (付属 品 一 式 キ オマ ケ ),、 ロー ラン ド 


MRC-PC8 (付属 品 一 式 ) を も \15K く らい. 


まず は 〒 で ". 
& 400 甲府 市 国母 4-12-7 
望月 健司 29» 


ФЕХ-720Р ('85 年 3/14 購 入 , キズ ナシ , 
完 動 )+ 2 K RAM カ ー ド + 保証 書 二 説 
明 書 2 冊 + キ ハー ド ・ ケ ー ス € Y12—- 15K 
(送料 込み ), TEL を 書い て 〒 で . 
® 243 厚木 市 戸 室 107-54 

増田 剛 俊 15 歳 


PB-100(OR-1 装 着 済 , キズ アリ ) 十 
FA- 3 十 本 3 冊 を \10 一 12K. 
89 120 足立 区 小 台 2-25-13 

直井 秀和 


d» РС-6001--РС-6006--РС-6052-- 7 2 

ー テ レビ 付属 品 一 式 填 関連 図書 30 過 を 

送料 そちら 持ち て 40K. WT. 

Ф 661 尼崎 市 武庫 之 荘 本 町 1-16-15 
勝 浜 良 博 15 歳 


ФРС-1251(5:%), ЖУ, キズ アリ ) 十 
CE-125S と PC-1501( 完 動 。 箱 アリ , は と 
ん ど キ ズ ナ シ ) 圭 CE-157 を いずれ も ぎ 30 
K 前 後 . また 他 機 種 + オ ヶ と の 変換 可 . Ж 
望 を 書い て くだ さい . 
〒560 豊中 市 宝山 町 18-4 

ЖАЛ 


まま X1 用 ディ スプ レイ CZ-801D を \50K, 
プリ ンタ CZ-8PP2 ғ Y30K, ROM 
BASIC ボ ー ド € Y10K, PC-6001(32K) 


+ デ ー タ ・ レ ュー ダ PC-DR330 # Y30K. 


送料 そちら 持ち . МТТ. 
Ф 569 高槻 市 日 吉 台 2-8-2 
佐々 木 貴 


Ф PASOPIA (Ver1.1) を Y20K, AP- 
PLE コ ュ ン パチ (48K) を ぎ \40K. まず は 〒 


t. 
® 191 日 野市 旭ヶ丘 6-73 日 野平 山 台 
住宅 206 号 

松岡 雄一 17 歳 


186 


ク る 
YRU 
—C-%ool>=kl[ 


(С® o 2. , Фф, 
AA So な て 。 9547 QS 
=з? OD. 4 


or VC 01+ PERE Ee RO 
OBR / FIO VE» M 


per m 
ж 2a6 
BREA 


ФРС-1251--СЕ-124--Ж ғ ¥10K fiij Ж. 
TUO 
€ 572 寝屋川 市 三井 ヶ 丘 5-7 A-108- 
304 

坂本 康一郎 15 歳 


Ф PC-1245 十 CE-125 十 箱 & Y18K, 近県 

の 方 手渡 し 可 . 詳し く は W〒 で 

а 496 海部 郡 佐織 町 勝 幡 神様 田 1752-2 
濱 谷 勝浩 18 歳 HIS 


Ф PB-100 ([F]X- — fif) +ОК-1+ЕА-3+ 

関連 図書 を \12K. 

403 南都 留 郡 西 桂 町 倉見 716 
ЕЛ И 


d» PC-8001 (32K) + PCG-8100 + PC-8048 


K-RM-210*a* Y45K, まず は W〒 で ". 


€ 616 京都 市 右京 区 太 泰 西野 町 20-11 
山本 栄二 16% 


d» PC-1500--CE-150 を \30K 以 上 , FX- 
702P キ プリ ンタ サカ モ セット ・ イ ンタ ー 
フェ イス を きき ぎ 10K. まだ PC-1500 填 CE- 


150 E PC-1261 4 CE-125(S) と の 交換 も 可 . 


WTC: 
& 485 小牧 市 小牧 原 新 田 117-3 
伊藤 浩美 216 


ФРС-8001ткК П (бс т, ЖЯ, マニ ュ ア 

м, 付属 品 付 ) +PC-6082 十 関連 図書 + 

#¥50K. 近く で 取り に 来 て くれ る 方 優 

Жж, まず は W〒 で . 

а 455 名 古屋 市 港 区 千鳥 1-4-6 
Ш 16 


Ф ЈЕ-200 +16 2X10K, DR-2 を \6 
К, セッ ト で きき 15K. どちら も 完 動 , Ж 


43. PC-1245/51+CE-125 L の 交換 可 . 


& 091 常呂 郡 留 辺 楽 町 元町 72 
高田 重 和 18 歳 


沼 本 方 


d$ PC-1245-- 3577 > FBASICAT"] 4-7 = 
ュ ア ル 十 箱 キ テン プレ ー ト 二 ハ ー ド ・ カ 
バー( 完 動 , 無傷 , 新品 同様 ) を \10 一 15 
K. 送料 こち 6 持ち . TEL を 書い て W 
TE: | 
Ф 353 志木 市 柏 町 1-7-32 

竹田 一 成 


d»JR-200-- i, 付属 品 ) 二 PB-200 十 ( 関 
連 図 書 ) を 20K ぐ らい . まだ ファ ミコ 
ン 十 カートリッジ 5 本 と の 変換 も 可 . 
W〒 で ( ヾ ラ も 可 ). 
電 484 犬山 市 西 古 券 657 

EUER 14% 


Ф X1turbo (CZ-852C 圭 CZ-850D, レッ 

К) 土 CZ-8RL1 (専用 デー タ ・ レ ユー ダ /) 

キキ ー ボ ー ド ・ カ バー プリ ンタ ・ ケ ー 

ブル . 5 月 18 日 に 購入 し だ ば か り の 新 同 

Ct, ЖТ: 

а 598 泉佐野 市 東 羽倉崎 町 15-26-621 
竹之内 宗治 | 


ФРС-1350 を \25K (説明 書 他 付 属 品 ア 


)), CE-202M £ X18K, CE-201M を 
FOK まとめ て 買っ て くれ た 方 に は 
壮 5K く らい 値引き し ます . 
&» 750 下関 市 長崎 新町 19-7 

藤永 憲 作 


ФРС-6001т II ( 取 説 , 箱 付 , シル バー, 
キー ボー ド の 交換 済 ) キ ジョ イス ティ ッ 
ク 二 TV 用 ケー ブル サキ ー ボ ー ド ・ カ ババ 
ー+ 関 連 書 数 國 Y30—40K, WT. 
&» 285 佐倉 市 馬渡 1447 

内 田 裕彦 


間 び ゅ う 太 士 デ ョ イコ ント ロー ラオ を 
\18K 前 後 . WTT. 
® 486 春日 井 市 旭 町 2-12 第 1 コー ポ 
ノ ザ キ 205 号 

熊崎 正成 13 歳 


ФРВ-100--ЯЖ2 Il 2 Y 4 К, PC-1245( 説 
明 書 等 付 ) を \5K. WT〒 て . 
Ф 250 小田 原市 南 鴨宮 2-7-20 

小滝 Bx 


d» PC-6001-- PC-6006 + PC-6091-- PC- 
8093+ ¥ = z 7 м + + FX-502P # ¥0 
Ke WT. 
® 270-1] 我孫子 市 我孫子 920-80 

石橋 * 


Ф5С-3000+ВАЅІС LEVELII 4- 2 — К 

リッ ジ 5 本] ジョ イス ティ ッ ク 2 個 十 デ 

ー タ ・ レ ュー ダ 用 の 接続 コー ド 十 本 十 箱 

£Y30K 高く 買っ て くれ る 人 か ヵ か 近県 の 

人 優先 . WT. 

«€» 695-01 江津 市 有 福 温泉 町 643-2 
脇田 浩一 


d$ PC-8001mk II + PC-8044K + Ж 2 Ж 

¥35~ 45K (送料 こち 6 持ち ). な る べく 

手渡 し 希望 . TEL 書 いて W〒 で . 

Ф 490-12 海部 郡 美和 町 森山 東江 端 5-1 
W ЖА, 


Ф PC-8001mk П (Ri, 説明 書付 ) +GSX- 
88002 ¥20~ 30K. МТС. 
а 254 平塚 市 小鍋 島 2092 

高木 秀雄 16 歳 


éd PC-8001(32K) -7 9) —7* FART 
レイ +РС-6082 を \40K, PC-1501 十 関連 
図書 を \30K, CE-150 を ぎ 20K. PC-1501 
--СЕ-150% 6 Y45K, 手渡 し 希望 . TEL 
を 書い て W〒 で . 
e» 277 東 葛飾 郡 沼南 町 高柳 1113-21 

宮 和久 ME 


Ф M5PRO- BASIC G を \20K. また だ は 
PC-1350 用 CE-202M t の 交換 も "T, TT. 
® 144 大 田 区 仲 六 郷 2-40-1-206 

梶谷 ғ 


意 PB-110 十 説明 書士 ライ ブラ リ 十 箱 十 
RAM メ パッ ク 十 保証書 (86 年 1 月 まで ) を 
Ұ4--5К< bl. 
® 335 上 蔵 市 南町 4-10-18 

山岡 良 医 


Ф PC-6001-- PC-6006 7? Y25 —35K, PB- 
300(855F 1 月 購入 , 箱 付 , Ж) ҒСНА- 
1 を ぎ 10 一 12K, FA-3('85 年 4 月 購入 ) 
ЖҰ5К, デー タ ・ レ コー ダ 6O85 年 5 月 


購入 ) ғҰ5.5К, 
&» 039-01 三戸 郡 南部 町 大 向 字 経 ヶ 森 
54-6 

佐々 木 健一 


Ф PC-6001mk II (1/O'85 年 7 月 号 の 改良 

ik, 完 動 品 ) 二 PC-6031( デ ィ ス ク ・ ユ ニ 

ッ ト ) を \50K 前 後 . すべ て 箱 , マニ ュ 

7м, 付属 品 , 保障 書付 . バラ 売り 可 . 

ҮТ. 

# 557 大 阪 市 西成 区 天下 茶屋 東 2-6-27 
増田 真治 


d$ MZ-80B -- G-RAMI-- f£ + = 27v 
e Y50K, 

Ф 359 所 沢 市 西 所 沢 2-12-3 

沢田 大 輔 13 歳 


&MZ-731+ f + Z a 4 X7 4 > 2 + Z 
リン タ 用 紙 2 巻 十 本 十 付 属 品 を \40K ぐ 
6v. 希望 価格 を 書い て 〒 で . 
Ф 507 多治見 市 虎 渓 山 町 5-67-15 

小林 直樹 15 歳 


$M 5 用 プリ ンタ (PT-5) &Y25K, WT 
1% 
9198 青梅 市 青梅 1354-15 

高瀬 秀久 


更 PC-6001( 多 少 色 ハゲ アリ ) 十 データ ・ 
レ ュ ユー ダ 十 本 十 ヶ を ぎ 20 一 25K. 希望 価 
格 を 書い て W〒 で 
& 280 千葉 市 桜木 町 631-45 

高橋 博明 


あま シャ ー プ RF ビデ オ コンバータ (CZ- 8 
VO +Н#Е= 5 (8 型 ぐ らい ) を \8 一 
10K で らい . バラ 売り も し ます . SR 
っ て くれ る 方 優先 . 送料 そちら 持ち . 
W〒 で . 
259-11 伊勢 原市 高森 2-35-4 

岡崎 光 芳 16 歳 


* 


ePiOo[1]-[3], 84 年 4 ~8 J = # 8 IF 
まとめ て \4K( 送 料 込 ), PC-1261 を \15 
K, CE-125S 付 な ら ば \27K ぐ らい , マ 
イ ュ ン ・ ゲ ー ム の 本 [1 -[5], PC 活用 
研究 , M5 や PC-6000 シ リー ズ の 周辺 機 
器 を 適 価 で て , WT. 

&» 701-02 岡山 市 藤田 536 

渡辺 護 15 歳 


ФЕМ. 7 /NEW 7 付属 品 十 専 用 デー 

タ ・ レ コー ダ ( キ ズ , 汚れ 可 ) を \43K. 

WFT. 

Ф 658 神戸 市 東灘 区 御影 石町 2-12-26 
多 谷 学 


も 富士 通 FM-7/NEW7 を ぎ \50K 以 下 . Ж 
価 優先 , キズ 可 . 無 改造 , 完 動 品 に 限る . 
WTC. 
Ф 489 瀬戸 市 田端 町 1-18-2 

三宅 正彦 


€ PC-8001-4- 1 / +a 2 Y20K, М5-- 
BASIC I С+а % ҰОҚ 売っ て くれ た 
人 に は PB-100 を あげ ます . МТТ, 
@ 481 西春 日 井 郡 師勝 町 大 字 六 ツ 帥 
520 

加藤 訓 久 


ポケ コン , パソ コン な ん で も いい か ら 
Ұ5-- 6K. な ん と か 動け ば な ん で も い 
с, 機種 を 書い て 〒 で . 
Ф 370 高崎 市 飯塚 町 1514-3 

馬場 敏男 14% 


€MZ-1500(X Ж, ігі TRE) Y30K € 6 
t, MZ1500 用 か PC-8001mk II 用 の ジ 
ョ イス ティ ッ ク を 3K. МТТ. 
Ф 561 豊中 市 名 神 口 1-3-1 

斉藤 治彦 


ФІНРС-6001ЭЕВАСІСРҰЗК, WT 
p 
&» 361 行田 市 桜町 1-18-13 

斎藤 Ж 15% 


€ PC-1401, FX-602P( 多 少 の キズ 可 , 
完 動 品 。 マ ニュ アル 付 ) を \ き 4 一 5K. 
W〒 で . 
& 120 足立 区 青井 3-20-7 

KIRA 14% 


К УУ о ол, о ш о УУ RE NN і 


PiOBAZZAR 


%РС-1251--СЕ-124%Ұ8КД.К(т-а 

アル ナシ , キズ アリ ч), 希望 価格 と キ 

ズ の 場所 を 図 に 書い て W〒 で . OX 

っ て くれ る 人 優先 

Ф 865 玉名 郡 横島 町 大 字 横島 8948 
岡本 慶 士 


¢ PB-100 か PC-1245( 完 動 , キズ 不可 , 
Ж, 説明 書 , 保証 書付 ) を \6K ぐ で らい. 
Ф 526 長浜 市 小堀 町 497-2 

松井 春彦 14 歳 


PC-1350( マ ニュ アル 付 ) *Y6K, 改 
X XA, シミ , 汚れ な ど 完 動 な ら ば 可 . 


Ф 998 酒田 市 若竹 町 2-2-16 
大 川 武彦 
$PiO84 年 4, 5 月 号 を 1 冊 \0.5K GX 
БА). 
8$» 799-01 川之江 市 金 生 町 山田 井 1528 
長野 輝久 


を PiO'84 年 9, 10, 12H = #&#0.5К 
(切り 抜き 書き 込み は 不可 ). WFT. 
® 719-03 浅口 郡 里庄 町 浜中 788-1 


を PiO'85 年 3 4 月 号 を 各 半 0.5K. 2 
農 ま と まっ て いる と な お 可 、W〒 で . 
® 223 横浜 市 港北 区 高田 町 917 ハイ 
ホー ム つ な し ま 205 号 

ニッ ツ 堀 洋一 


を Pi0'84 年 12~'85 年 5 H Z を 各 \0.4K. 

リス ト が は っ きり わか れ ば 書き 込み , 切 

り 取 り 可 . т улутт; 

© 518-04 名 張 市 つつ じ が 丘 北 9-144-2 
篠原 裕樹 14 歳 


ФРІОМ4-7 月 号 を な る べく 安く . ま 
だ た PB-200( 完 動 ) を \3 — 6 K. 送料 こち 
ら 5 持ち . WT C. 返事 は 必ず 出し ます . 
@ 452 名 古屋 市 西区 上 小田 井 1-309 

勝 真一 


る MZ-1D15( カ ラー ディ スプ レイ ) を \20 

ー25K(MZ-2000 用 の ケー プル 付 ). УТ 

p 

Ф 356 上 福岡 市 南台 1-15-7 南台 コー ポ 
河合 w 


€ PC-60M43, PC-KD201, PC-60M61, 
PC-6601-FD1 を 各 定 価 の 半額 以下 . ТТ. 
Ф 625 舞 稚 市 字 余部 下 運輸 省 宿 舎 
236 号 

A 明 37 歳 


$2000 文 字 , 15 色 対応 の カラ テー ディス プ 

レイ (シャ ー プ の 14M-141C,。 ニ デュ の 

NH-14DK な ど ) を ぎ 20 一 25K で らい . 

Ф 211 川崎 市 中 原 区 下 小田 中 1387-7 
塚田 和男 


BUY 


# $q o @%# NATIONAL JR-3006 457" 


ése SI (4244) 
4848 3, TEL AP 848. ВИ Pes 
HA ほな か m き に (HH 189 33.) 


055 BAR WX Т »fz 2581-12-302 
FRIR 


を PC-6006 を で きる だ けり け 低 価格 で (\6K 

前 後 )、 完 動 品 を お 願い し ます . МТТ. 

T245 横浜 市 戸塚 区 深谷 町 947-29 
倉田 幸治 15 歳 


FM-7 用 の プリ ンタ を 適 価 で 求む W 
"TI. 
@ 945 柏崎 市 桜木 町 26-14 

小野 塚 聖 一 17% 


$PC-6081 ま た は PC-DR311 を 4K. W 
いさ 
758 萩 市 越 ヶ 浜 1 区 の 3 

藤本 英司 15 歳 


¢ CE-125(S) を \10K 以 下 , PiO'844 11, 
12 月 号 を 各 半 0.5K. МТТ, 
Ф 206 多摩 市 鶴牧 4-6-1-205 

矢島 岳彦 16% 


Ф CE-152 を 10K( 完 動 品 な 6 少々 の キ 
жар), キズ の ひど いも の な ら 6 議 7K 以 
FT. BASIC ソ フト ウェ エア 集 (工学 社 ) 
の [1| を \1K( 少 々 の よごれ 可 ). まず は 
W〒 で (いつ まで も 待つ ). 
Ф 854 諫早 市 山川 町 6-4 

ЖЕЖ 12 


を CE-124 を \2.5K で らい (送料 そちら 6 持 
5). 近く の 人 優先 . 近く の 人 な ら 6TEL 
書い て МТТ. 
® 483 江南 市 藤ヶ丘 6-1-1 江南 団地 56- 
407 

福島 悟 


$CE-124* Y2K, 完 動 な ら 少々 の キズ 
Vn TES 
® 992 米沢 市 大 町 2-3-15 

梅津 尚史 


$FX-702P 専 用 の FA-2 を 安価 で . 
Ф 680 鳥取 市 今 町 2-381 
吉岡 隆一 16 


$CE-201M を ぎ \ ぎ 8 一 9K 前 後 (多少 な 6 
キズ ア DT ù), PiO'84 年 10 一 !85 年 1 月 
%е 1 冊 \0.6K で (切り 抜き ナシ , 多少 
の 汚れ , 折れ 可 . で きれ ば まとめ て ). 
Ti. 
® 731-01 
27-13 
早乙女 裕彦 


広島 市 安佐 南 区 昆 沙門 台 2- 


CE-124 を \1.5K( 完 動 な ら キ ズ , 汚れ 
un, WT. 
@ 250-01 南足柄 市 狩野 57-4 

篠田 雄一 


を $PB シ リー ズ 用 FA- 3 \3K 以 下 , РіО’ 


85 年 4 月 号 \0.5K. な る べく 早 〈, X 
$: 
Ф 981-31 上 泉 市 鶴 が 丘 4-4-3 

針生 浩 信 16 歳 


ФРїО[1]—[3], 84 年 4 ~12 月 号 を 各 

\0.5K. な る べく まとめ て . 

Ф 533 大 阪 市 東淀川 区 豊里 2-1 3-909 
四ツ谷 類 


¢ Pi0'84 年 10 一 85 年 3 月 号 ま で で PC- 
1350 の プロ グラ ム や 情報 が 載っ て いる も 
の を 1 W¥0.5K. WFT. 

Ф 465 名 古屋 市 名 東 区 藤森 2-37 Hor 
中 部 ソフ トウ エア 本 卿 寮 

Ж 正彦 


靖 当 方 …PB-200 十 パソ コン お も し ろ ゲ 
— [t], [2]. [4]-48& 2 4 7 » v [2] 
TABISIRE-TYX5K 

貴方 …PC-1251/55 十 z. ТТС. 


8 701-01 岡山 市 平野 536-17 
池上 Ж 


Y 当方 …PC-8001mk II + 24K + 付属 品 
+т=л7л 3 (А х, 汚れ な し , 
完 動 ) 

貴方 …PC-8801 圭 付属 品 キ オマ ニュ アル 
(読め る こと ) 十 箱 ( い ずれ も キズ , 汚れ 
な し 。 ось). WTE 

Ф 310 水戸 市 元吉 田町 145-2 

藤咲 ІҢ 14 歳 


疹 当方 …PC-1255( マ ニュ アル ナシ ) 
貴方 …PB-300+FA-3/PB-110 十 OR-1 二 
FA-34 FP-12S/PC-M01--CE-124, また 
は \15K で 売る . 
© 923 小松 市 白 江 町 2-54-1 

佐々 野良 成 


V 当方 …PB-410(|[F| キ ー 付 , キズ アリ ) 
+FA- 3 +FP-12+ 2K RAMZ – Ех 
2 二 ゲ ー ム ・ ラ イプ ラリ 3 (5 ріп 
あり ) 
貴方 …PB-500(RAM カー ド 不要 )/PB- 
700/PC-1500. PB-700 ま た は PC-1500 の 
方 に は 十 々 し ます . キズ は よほど で な い 
限り 可 ( マ ニュ アル 等 も お 願い し ます ). 
Ф 566 摂津 市 庄屋 2-5-35 

JF EE 


@ `" J ---PC-1245 (SEB ñ) + f+ Jš ñ, (A 

部 ) 十 本 十 外 部 電源 十 z 

貴方 …PC-1350( 完 動 品 ) 二 付属 品 (全部 ). 

TWTT. 

@ 018-12 由利 郡 岩城 町 亀田 大 町 43 
川上 祥 広 1458 


珍 当 方 …M5 十 BASIC L G+ ゲー ム ・ 
カー トリ ッ ジ 7 本 キマ ニュ アル 4 同士 ジ 
ョ イス ティ ッ ク 1 本 十 PC-1245 

ft Jj --- PC-8001/MZ-80C/PC-6001 + PC- 
6006 

® 037-02 北津軽 郡 金 木町 嘉瀬 下 小栗 
іш 


松川 拓哉 14 歳 


当方 …PC-6001 二 PC-6006 十 PC-6042K 
+РС-6082+ a 

貴方 …PC-8001mk II + デー タ ・ レ コー 
ダ /FM- 7 キア データ ・ レ コー ダ / フ ァ ミ リ 
ー コ ンピュータ ファ ミリ ー ベ ー シ ッ ク 
+ デ ー タ ・ レ コー ダ 土 カートリッジ 5 本 
ELE-TXIOK, また は \45K 以 上 で 売る 
(32565 а), W〒 ま た だ は 60 円 切手 を 
入れ た 封筒 で . 

612 京都 市 伏見 区 深草 出羽 屋敷 町 6- 
4 

水上 智之 16 歳 


Y 当方 …PC-1245 十 CE-124 十 本 
貴方 …PC-1350 十 本 十 み /PC-1261 4- Ж, 
W〒 で . 
& 012 湯沢 市 前 森 4-5-28 
黒沢 正憲 


形 当 方 …PB-100F 十 本 十 箱 十 \ ま 5 一 6K. 

貴方 …PC-1500 ま た は PC-2001. FT. 

® 538 大 阪 市 鶴見 区 今津 南 3-1-21 
龍神 正人 13% 


Y 57;--MZ-7314- TIR a 

貴方 …MZ-1500 キ マニュ アル TT. 

Ф 612 京都 市 伏見 区 納 所 中 河原 3-109 
覗 渕 康 雄 14 歳 


Y 当方 …JR-100 二 PB-300 十 JR 用 TV a 

ン バ パー タ 二 デー タ ・ レ ュー ダ 士 jR-100 

用 関連 図書 士 PB-300 用 ロー ル 紙 

貴方 …FM- 7 用 5 "FED 二 IF( で きれ ば 

EPSON の TEF-20 を ). 

8» 413-04 賀茂 郡 東 伊豆 町 稲取 923 
小 板 卓 也 


ET 
= ペソ ンー PCG ваё 
< < 
QU - 
rb 3、5 本 
( |М е С) 


Фі)--РС-1250(Х = Y Я) +CE- 
125S 3 月 購入 ) 付属 品 (保障 書付 ). 
貴方 …PC-1350( で きれ ば カセ ッ ト ・ イ 
ンタ ダー フェイ ス も 付け て )。 完 動 で あれ 
ば 多少 の キズ は 構い ませ ん . また は \22 
K で 売る . W〒 で (な る べく 手渡 し 希望 ). 
Ф 246 横浜 市 瀬谷 区 下 瀬谷 町 3-15-22 
山 部 英二 


Y 当方 …PC-1251 寺 CE-124 改 (アプ アダプタ 
fl) +a 
貴方 …JR-100 二 RF コン バー タオ eg. W 
T 
Ф 855 都城 市 吉 尾 町 473-1 都城 工 専 


@ 当方 …PC-1251( 箱 , 説明 書 , ハー 
ド ・ ケ ー ス 付 , "85 年 1 月 購入 , 完 動 , > 
し キズ アリ ) 十 々 
貴方 …PC-1255/PC-1350/JR-200( 完 動 , 
説明 書付 . $ 12Ұ19-21К 2 2. 
үт, 
@ 753 山 日 市 木町 6-10 

ZTAK 


® `; 55---ЕХ-750Р+ 7 — х +f E + šE 
明 書 士 4K RAM カ ー ド (少々 キズ アリ ) 
貴方 … シ ャ ー プ の ポケ ュ ン /PB-700/PC- 
8201/JR-800/HC20/FX-702P( 少 々 キズ 
"[, 説明 書付 ). 機種 名 , TEL 書 いて 〒 
T. 

а 409-01 JEDE Е ЕТІН 551569 
佐藤 和英 14 歳 


Y 当方 …PC-8801 キ カラ ー デ ィ ス プレ イ 
(シャ ー ブ 2000 文 字 200 ラ イン ) 
貴方 …①PC-6601SR 十 PC-TV151②X1 
色 は で きれ ば 赤 十 専用 ディ スプ レイ ・ テ 
レビ CZ-801D か CZ-800D. ② の 場合 デー 
タ ・ レ コー ダ を 付け ます . TEL, ЖЖ 
の 色 を 書い て Б шай 
& 994 天童 市 中 里 6-9-34 

山田 和 永 


яны ——— 

し まい ます . と くに 汗 か き な 私 など は , せっ か くき れい に 書い た 
原稿 を , 汗 で 汚し て し まっ だ り し て 大 変 で す . 

Cb, も うす で 楽し い 日 が くる の で す . ムフフ …. 実は 家 の 近 
く で 毎年 夏 に な る と 「 和 花火 大 会 」 が あり , クー ラー の きい だ 自分 
の 部 屋 で 冷た いも の で も 飲み な が ら , ゆっ くり と 打ち 上 げ 花 火 が み 
られ る の で す . これ は な に より の 清涼 剤 に な り ま す よ . 皆さん の 
街 で も , きっ と 同じ よう な 夏 な ら で は の 楽し み が あ る こと で し ょ 
948. (О) 
画 ア メグ グラ 以 来 , G. ル ー カ ス と HH. フ ォ ー ド の ファ ン で す .。 イン 
ディ ー ジ ョ ー ン ズ も ハン ・ ン ソロ も 大 好き で す が , プレ ー ド ・ ラ ン 
ナー の H. フ ォ ー ド だ け は 好き に な れ ま せん . や は り 彼 の 使い 方 
を 知っ て いる の は ルー カス だ け な の で し ょ うか . と いう わけ で , 
刑事 ジョ ン ・ ブ ッ ク を 見 に 行く の を だ め ら っ て いる 今日 この ご ろ 
СҰ, 

と ころ で , 最近 ムキ に な っ て 12 イ ンチ ・ シ ング ル ば か り 聞 いて 
CT. や は り ポ ボー ル ・ ハ ー ド キャ ッ ス ル の 上 『19』」 が 3 バー ジョ 
ン と も 良かっ た で す よ .。 これ か ら サ ンプ リン グ ・ サ ウン ド の 全盛 
時 代 が 来 そ СТ. kyon2 と SEIKO の 12 イ ンチ ・ シ ング ル は 見 事 
に 期待 を 裏切ら れ て し まい まし だ . (Key) 
画 先 日 , 本 を 買っ た 帰り に 祭り ば や し の 音 を ふと 聞き まし た .「 今 
Н, 50 eA Cbo7:250? いや それ より , ここ いら 辺 に は 
宗 り が で きる よう な 広い 場所 な ん て な か っ た だ た ぞ …」 空 耳 か と も 思 
cur s Штаты МАЕ TM 
(が か ます 、 

と ころ が , 音 が 一 番 よ く 聞 こえ る 場所 に 来 だ た と だ ん …. 祭り ば 


定期 購読 に つい て 
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や し に 聞こ えた だ の は ,。 な ん と ドラ ム の 音 だ っ だ の で す .。 だ れ か ド 
ラム の 練習 を し て い だ ん で すわ ねぇ. 思わ ず ,「 ド ラム だ だ くん だ っ 


го, ちゃ ん と 洋風 に や れ /」 と どなり だ た く な っ て し まい まし た . 


皆さん の 中 に も ドラ ム を だ だ く 人 が いる と 思い ます が “ドラム 
の 音 に 聞こ える よう に " た だ きま し ょ う ね . — (V) 
B 『 パ ソン コン D] 大 成功 』」 の コー ナー に 送ら れ て くる は が き を 見 て 
いる と 。 ソノ シー ト を 再生 する の に ., ご い オ ー デ ィ オ を 使っ て 
いる 方 も いる よう で すね . 

自称 オー ディ オ ・ フ ァ ン の 私 も , や っ と セ バ マレ ー ト '… デ ンプ を 
手 に 入れ る S NUES. pé cgi b クロ ー ド ホー ン を 小 
さ な 音 で 楽し ん で いま す . これ で 私 も オー ディ オ ・ マ ニア の 仲間 
Жаса? し た だ 。 

次 の ゲ レー ド ・ ア ッ グ で は , ナチ ログ ダグ ・ プ レイ ギー の キ EER 
ッ ト を 作ろ うと 思っ て いる の で す が ,。 いつ の こと に な る や ら 。 
アナ ログ 派 の (Ti) 

BO, 友人 か ら テ ニス に 誘わ れ ま し だ. ここ 数 年 運動 し て い 
な いせ いか , 1 時 間 プ レー し た だ け で 体 の 節々 が 痛く な り , ДКА 
な く ダ ウン し て し まい まし だ た だ. この 季節 汗 を か く の に 気持 の いい 
時 期 で す . 読者 の 皆さん も いい 汗 か いて くだ さい . (Shu) 


画 社 会 人 1 年生 に と っ て , 最も 苦し い の は 夏 で は な いで し ょ うか 


な ん と いっ て も , この 10 数 年 間 ほ と ん と 習慣 の よう に な っ て いる 
“夏休み " が な い の で すか ら あの 夏 の 2 箇月 は , も う 私 の 
手 に は 戻っ て こない の で す . よー し , それ な ら そ れ で 少な い 休 み 
を 有意 義 に 過ごせ ば いい ん だ / ノ 


画 ど う も 私 は 世 事 に 疎い と いう か , 面倒 が り 屋 で , 世 慣 れ だ た 人 に 
45r, シカ レ エ て し まい ます 装い と た とき に こみ ル を だこ と を 考 た る と 
な お きら 暑く な る の で , 結局 , 相変わらず の まま に な る の で す が 

(Y;) 


> x > > 


画 送 付 方 法 
③④ 郵便 振替 《 東 京 5-22510〉 
衰 の 通信 欄 に , VF PiOfo 何 月 号 か ら ご 希望 か 明記 し て ご だ さい . 
ORTES EE ご 希望 明記 し た も の 
QER] Rê 
x I 90753 C CXXSE & TS SUA 
(1.000 円 以上 の 切手 代用 は ご 遠慮 願い ます ) 


を 同 寺 し て くだ さい . 


昭和 60 年 9 月 1 日 発行 (毎月 1 回 1 日 発行 ) 


営業) ТЕ(03)375-5784(6) 

ぜん らく ビル ん 5F ОБ) ТЕ(03)370-330169 
(編集 〕 20 (03) 320-12180% 
定価 48009 


と 開き 直っ て いる この ご どろ で す 。 
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SW 
ゴジ ラ と の 追い か け ご っ こ は 、 ま る で リア ル タ イ ム ・ ゲ ー ム を や っ て いる よう な 迫力 だ 。 


— 。 し と に かく 絵 が 速く て 気持 ちがい い 。 
静岡 県 井 浜 原子 力 発電 所 に ゴジ ラ 上 陸 / の 新宿 の ビル 街 が 実物 と を っ くり 。 こ こま て 都市 を シミ ュ レ ー ト 出来 る と は 驚い た 。 
け ぞ る 男 は 、 皆 さん 御存知 そつ くり サン / 

町 で ゴジ ラ か ら 逃 げ る 時 が 、 と て も リア ル で お も し ろか っ た 。 
まる で 映画 を 見 て いる よう な 感じ が する 。 


s 尚子 が カ ワ ユ イ ノ 思 わ ず ツ ラク あたっ て や り た ( が っ た 。 
を 絵 が きれ い 。 ゴ ジラ が 通り すき る と 、 建 物 が 炎上 する の に は びっ くり し た 。 


雄叫び サウ ンド ・ カ セッ ト を 聞き な が ら プ レイ し て いて 、 気 が つい た ら 夜 が 明け て いた 。 


NEW 


ODZILLA 


ゴジ ラ に 襲わ れ だ 第 五 八幡 丸 船内 。 不 気味 шале E н i 
な ミイ ラ が あな だ を 待ち 受け て いる 。 РСВВОТ/ткП/ӘН Г TAAR) * 8,800 Mo си 


京王 プラ ザ 前 で ゴジ ラ 復 活 / スー パーX と 
の 壮烈 な 闘い 一 その 軍配 は どちら に 。 
"M 


ョ シネ スコ ・ ア トペ ヘン チャ ー SRATI -IA 


E ІШКЕ 


昭和 29 年 ・ 公 開 А 
Banas C е шае 


PC8801 /mkI/SR.FM-7/77 D . - =m PC8801/mkI/SR.FM-7/77 
X 4,800 5-9 ⑥ 東 宝 ・ 東 宝 映像 


ЯНА 


шетен PC8801/mk II FM-7 【 予 価 \B,800】 


imo RESH 0-0 


テレ ビ パ ソコ ン ・ ミ スタ ー PC は 新しい 楽し み И алы 音源 つき 6 重 和 音 8 オ クタ ー ブ サ ウン ド , 
方 て いっ ぱい の ドリ ー ム マシ ン 。 テ レビ と <〈 る と 自動 的 に 選 局 し て く 〈 れ る 番組 子 約 機能 。  @2 オ クタ ー プ の 音階 つき 音声 合成 機能 。 
0 ツ コ 〆 が いつ っ しょ に な っ て 、 こ 相 ま で で жасам ee tp ht iU—7'n77N&SfL — ⑧ 便 利 な 3.5 イ ンチ ディ スク を 1 ドラ イブ 実装 。 
き な か っ た 事 も 軽々 こなし て し まう の で す 。 @ カ ラフ ル て 美しい 15 色 カラ ー グ ラフ ィ ッ ク 機 能 。 € PC-60002)— X-PC-66002) — Xo 
た だ た と えば スー パー イン ポーズ 。 すき な イラ ス  e 自 然 な 楽器 音 ・ 効 果 音 な ど が 楽し め る FM 資産 を 豊か に 受け 継ぐ 豊富 な ソフ トウ ェ ア 群 。 % 
ト や タイ トル ・ 字 幕 を ビデ オォ 画面 に 簡単 に 合 
成 で きる 。 が ガー ルフ レン ド を 主役 に ラブ スト ー テレ ビバ パソ コン PCó660ln endi: Ed | 17 


リー し だ り 、CG を 合成 し て アー ト に 凝っ た 9、 
も 一 最高 。 一 歩 ス スン で 未来 遊べ ちゃ う 実 
に 愉快 な ミス ターPC な の で す 。 

人 @ テ レビ と パソ コン を 遠く か ら 目 在 に コン トロ ー 


` И MEAM @ バ パー ソナ ルコ ンピュータ (本 体 ・ キ ー ボ ー ド ) 
ル て きる ユニ ー ク な 赤外線 方 式 リ ワイ ヤレ スキ PC-6601SR 標準 価格 155.000 円 


AIA る ディ スフレ イ テ レ ビ PC-TV151 標準 価格 94 800 円 
o Qiiri4522—:772v»2*23)»2 ワイ ン レ ッ ド 
@ テ レビ の 映像 し \ ソ コン の 画面 を 自由 に 重ね 


К ` ーー Т % = na 
られ る スー パー イン ポー ズ 機 能 を 標準 で 内 蔵 。 移 進 の ワイ ヤレ スキ ー ボ ー ド 品 テ レビ パソ コン 、 ミ スタ ー ロ PC。 АЕ 


テレ ヒン パソ ツ コ ン だ か ら ス ー パ ー イ ン ボ ポーズ まで こなす , えらい, | 
i 


Ж 5 の dt L HW | оша, RHE "m 


N O 
NC. 


x AM た C バ ー ソ ナル コン ピュ ー タ PC-6000 ヨ リー ズ gi | із NECO JA ys ン ン デミ? — No.1] pu 
| PC 600| МКП 日 本 電気 グレ ルー プ NEC パ ソコ ン イ ン フ ォ メ ーション セン ター ч 


T108 東京 都 港 区 三田 三 丁 目 14-10( 明 治 生命 三田 ビル )…………… 8 (03) 452-8000 
本 体 標準 価格 89,800F3 


※ 電 話 番号 は 、 よ く お 確 か めのう え お か け く だ さい 。 


ЖЕБЕ 17673-9 
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